|
version 1.66, 2005/02/09 20:39:47
|
version 1.68, 2005/11/07 15:43:03
|
|
Line 241 unless ($dbh = DBI->connect("DBI:mysql:l
|
Line 241 unless ($dbh = DBI->connect("DBI:mysql:l
|
| |
|
| exit 1; |
exit 1; |
| } else { |
} else { |
| |
unlink('/home/httpd/html/lon-status/mysql.txt'); |
| $dbh->disconnect; |
$dbh->disconnect; |
| } |
} |
| |
|
|
Line 430 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; |
| } |
} |
| } |
} |
![[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