![[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.239, 2004/08/24 10:59:50 | version 1.241, 2004/08/24 21:25:08 |
|---|---|
| Line 1908 sub remove_user_file_handler { | Line 1908 sub remove_user_file_handler { |
| if (-e $udir) { | if (-e $udir) { |
| my $file=$udir.'/userfiles/'.$ufile; | my $file=$udir.'/userfiles/'.$ufile; |
| if (-e $file) { | if (-e $file) { |
| unlink($file); | if (-f $file){ |
| unlink($file); | |
| } elsif(-d $file) { | |
| rmdir($file); | |
| } | |
| if (-e $file) { | if (-e $file) { |
| &Failure($client, "failed\n", "$cmd:$tail"); | &Failure($client, "failed\n", "$cmd:$tail"); |
| } else { | } else { |