Return to removenolongerused.piml CVS log | Up to [LON-CAPA] / doc / loncapafiles |
version 1.1.2.7, 2014/06/20 19:25:41 | version 1.1.2.8, 2014/06/20 21:33:06 |
---|---|
Line 65 if (@dirstodelete > 0) { | Line 65 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); |
} | } |
} | } |
} | } |