Return to lontokacc.pm CVS log | Up to [LON-CAPA] / loncom / auth |
version 1.9, 2003/08/01 17:25:40 | version 1.10, 2004/05/11 06:49:58 |
---|---|
Line 72 sub removefile { | Line 72 sub removefile { |
my $r=shift; | my $r=shift; |
if ($r->status==200) { | if ($r->status==200) { |
unlink($r->filename); | unlink($r->filename); |
&Apache::lonnet::logthis('Unlinking '.$r->filename); | #&Apache::lonnet::logthis('Unlinking '.$r->filename); |
} else { | } else { |
&Apache::lonnet::logthis('Failed to transfer '.$r->filename); | &Apache::lonnet::logthis('Failed to transfer '.$r->filename); |
} | } |