--- loncom/interface/portfolio.pm 2004/12/14 19:10:07 1.66
+++ loncom/interface/portfolio.pm 2004/12/14 19:17:54 1.67
@@ -496,6 +496,9 @@ sub createdir {
') while trying to create a new directory '.&display_file().'
');
}
}
+ if ($newdir ne $ENV{'form.newdir'}) {
+ $r->print("The new directory name was changed from:
".$ENV{'form.newdir'}." to $newdir ");
+ }
$r->print(&done());
}