Return to lond CVS log | Up to [LON-CAPA] / loncom |
version 1.115, 2003/03/18 22:51:03 | version 1.116, 2003/03/22 17:13:40 |
---|---|
Line 199 while ($configline=<CONFIG>) { | Line 199 while ($configline=<CONFIG>) { |
$hostid{$ip}=$id; | $hostid{$ip}=$id; |
$hostdom{$id}=$domain; | $hostdom{$id}=$domain; |
$hostip{$id}=$ip; | $hostip{$id}=$ip; |
if ($id eq $perlvar{'lonHostId'}) { $thisserver=$name; } | if ($id eq $perlvar{'lonHostID'}) { $thisserver=$name; } |
$PREFORK++; | $PREFORK++; |
} | } |
close(CONFIG); | close(CONFIG); |