Index: openacs.org-dev/packages/ecommerce/www/admin/tools/table-custom.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/ecommerce/www/admin/tools/table-custom.tcl,v
diff -u -r1.1.1.2 -r1.1.1.3
--- openacs.org-dev/packages/ecommerce/www/admin/tools/table-custom.tcl	25 Jul 2002 18:47:13 -0000	1.1.1.2
+++ openacs.org-dev/packages/ecommerce/www/admin/tools/table-custom.tcl	8 Oct 2002 15:47:09 -0000	1.1.1.3
@@ -21,16 +21,16 @@
           where user_id = $user_id and item = $DBQitem and item_group = $DBQitem_group
             and item_type = $DBQitem_type"} errmsg]} {
         ad_return_complaint 1 "<li>I was unable to delete the view.  The database said <pre>$errmsg</pre>\n"
-        return
+        ad_script_abort
     }
-    ns_returnredirect "$return_url"
-    return
+    ad_returnredirect "$return_url"
+    ad_script_abort
 }
 
         
 if {[empty_string_p $item]} {
     ad_return_complaint 1 "<li>You did not specify a name for this table view"
-    return
+    ad_script_abort
 }
 
 set col_clean [list]
@@ -44,7 +44,7 @@
 
 if {[empty_string_p $col_clean]} {
     ad_return_complaint 1 "<li>You did not specify any columns to display"
-    return
+    ad_script_abort
 }
 
 util_dbq {item item_original item_type value_type item_group}
@@ -58,8 +58,8 @@
       returning value into :1" $col_clean
 } {
     ad_return_complaint 1 "<li>I was unable to insert your table customizations.  The database said <pre>$errmsg</pre>\n"
-    return
+    ad_script_abort
 }
 
-ns_returnredirect "$return_url&$item_group=[ns_urlencode $item]"
+ad_returnredirect "$return_url&$item_group=[ns_urlencode $item]"