Index: openacs.org-dev/packages/file-manager/www/file-mkdir-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/file-manager/www/file-mkdir-2.tcl,v
diff -u -r1.1.1.1 -r1.1.1.2
--- openacs.org-dev/packages/file-manager/www/file-mkdir-2.tcl	9 Jul 2002 17:35:08 -0000	1.1.1.1
+++ openacs.org-dev/packages/file-manager/www/file-mkdir-2.tcl	8 Oct 2002 15:47:11 -0000	1.1.1.2
@@ -5,7 +5,7 @@
     Create a subdirectory
 
     @author  ron@arsdigita.com
-    @created Fri May 26 07:19:06 2000
+    @creation-date Fri May 26 07:19:06 2000
     @cvs-id  $Id$
 } {
     {path:trim,notnull}
@@ -27,7 +27,7 @@
 
 if {$errcnt} {
     ad_return_complaint $errcnt $errmsg
-    return
+    ad_script_abort
 }
 
 if [catch {
@@ -41,9 +41,9 @@
     
 } errmsg] {
     ad_return_complaint 1 "<li> The follow error occured: <br> $errmsg"
-    return
+    ad_script_abort
 }
 
 ad_returnredirect "file-list?path=[file dirname $path]"
-return
 
+