Index: openacs-4/packages/file-manager/www/file-upload-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-manager/www/file-upload-2.tcl,v
diff -u -r1.3 -r1.3.2.1
--- openacs-4/packages/file-manager/www/file-upload-2.tcl	18 Sep 2002 12:12:43 -0000	1.3
+++ openacs-4/packages/file-manager/www/file-upload-2.tcl	16 Oct 2002 22:13:41 -0000	1.3.2.1
@@ -23,10 +23,10 @@
 }
 
 if {![empty_string_p $title] && [empty_string_p [file ext $title]]} {
-    incr   errcnt
-    append errmsg "
+    ad_return_complaint "
     <li>The title you supply must have one of the following extensions:<br>
     [ad_parameter Extensions file-manager]"
+    ad_script_abort
 }
 
 # Done with error checking