![[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.178.2.17, 2004/04/19 11:28:18 | version 1.178.2.18, 2004/04/19 11:32:35 |
|---|---|
| Line 2385 sub TmpPutHandler { | Line 2385 sub TmpPutHandler { |
| my $store; | my $store; |
| $tmpsnum++; | $tmpsnum++; |
| my $pid = $$; | my $id=$$.'_'.$clientip.'_'.$tmpsnum; |
| my $id=$$.'_'.$clientip.'_'.$tmpsnum.'_'.$pid; | |
| $id=~s/\W/\_/g; | $id=~s/\W/\_/g; |
| $what=~s/\n//g; | $what=~s/\n//g; |
| my $execdir=$perlvar{'lonDaemons'}; | my $execdir=$perlvar{'lonDaemons'}; |