![[BACK]](/icons/back.gif){kind=icon}
Return to lonsql CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom|
Return to lonsql CVS log | Up to [LON-CAPA] / loncom |
| version 1.67, 2005/04/13 18:39:13 | version 1.68, 2005/11/07 15:43:03 |
|---|---|
| Line 431 sub make_new_child { | Line 431 sub make_new_child { |
| my $locresult = ''; | my $locresult = ''; |
| my $querystr = &unescape($arg3); | my $querystr = &unescape($arg3); |
| foreach (split/%%/,$querystr) { | foreach (split/%%/,$querystr) { |
| if (/^(\w+)=([^=]+)$/) { | if (/^([^=]+)=([^=]+)$/) { |
| @{$affiliates{$1}} = split/,/,$2; | @{$affiliates{$1}} = split/,/,$2; |
| } | } |
| } | } |