Return to lond CVS log | Up to [LON-CAPA] / loncom |
version 1.25, 2000/12/05 19:03:13 | version 1.26, 2000/12/05 19:14:59 |
---|---|
Line 606 sub make_new_child { | Line 606 sub make_new_child { |
} else { | } else { |
$now=time; | $now=time; |
{ | { |
my sh; | my $sh; |
if ($sh= | if ($sh= |
IO::File->new(">$fname.$hostid{$clientip}")) { | IO::File->new(">$fname.$hostid{$clientip}")) { |
print $sh "$clientip:$now\n"; | print $sh "$clientip:$now\n"; |