--- doc/loncapafiles/removenolongerused.piml	2014/06/20 19:23:03	1.10
+++ doc/loncapafiles/removenolongerused.piml	2014/06/20 21:21:44	1.11
@@ -90,7 +90,7 @@ if (@dirstodelete > 0) {
         chomp($choice);
         $choice =~ s/\s+//g;
         if ($choice eq 'Y') {
-            File::Path::remove_tree($dir);
+            File::Path::rmtree($dir);
         }
     }
 }