![[BACK]](/icons/back.gif){kind=icon}
Return to lond CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom|
Return to lond CVS log | Up to [LON-CAPA] / loncom |
| version 1.45, 2001/03/27 13:37:43 | version 1.46, 2001/04/02 14:43:17 |
|---|---|
| Line 990 sub make_new_child { | Line 990 sub make_new_child { |
| $reply=~s/\&/\n/g; | $reply=~s/\&/\n/g; |
| print $store $reply; | print $store $reply; |
| close $store; | close $store; |
| my $store2=IO::File->new(">$execdir/tmp/$id.end"); | |
| print $store2 "done\n"; | |
| close $store2; | |
| print $client "ok\n"; | print $client "ok\n"; |
| } | } |
| else { | else { |