Return to removenolongerused.piml CVS log | Up to [LON-CAPA] / doc / loncapafiles |
version 1.10, 2014/06/20 19:23:03 | version 1.11, 2014/06/20 21:21:44 |
---|---|
Line 90 if (@dirstodelete > 0) { | Line 90 if (@dirstodelete > 0) { |
chomp($choice); | chomp($choice); |
$choice =~ s/\s+//g; | $choice =~ s/\s+//g; |
if ($choice eq 'Y') { | if ($choice eq 'Y') { |
File::Path::remove_tree($dir); | File::Path::rmtree($dir); |
} | } |
} | } |
} | } |