Index: openacs.org-dev/packages/ecommerce/www/shopping-cart-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/ecommerce/www/shopping-cart-add.tcl,v
diff -u -r1.1.1.1 -r1.1.1.2
--- openacs.org-dev/packages/ecommerce/www/shopping-cart-add.tcl	9 Jul 2002 17:35:05 -0000	1.1.1.1
+++ openacs.org-dev/packages/ecommerce/www/shopping-cart-add.tcl	8 Oct 2002 15:47:06 -0000	1.1.1.2
@@ -54,7 +54,7 @@
 	<p>Sorry, you have an order for which credit card authorization has not yet taken place. 
 	Please wait for the authorization to complete before adding new items to your shopping cart.</p>
 	<p>Thank you.</p>"
-    return
+    ad_script_abort
 }
 
 set order_id [db_string get_order_id "
@@ -102,7 +102,7 @@
 	    values
 	    (ec_problem_id_sequence.nextval, sysdate,:errormsg)"
 	ad_returnredirect "product?[export_url_vars product_id]"
-	return
+        ad_script_abort
     }
 }
 
@@ -122,4 +122,4 @@
      where not exists (select 1 from ec_items where order_id=:order_id and product_id=:product_id and color_choice  [ec_decode $color_choice "" "is null" "= :color_choice"]  and size_choice [ec_decode $size_choice "" "is null" "= :size_choice"] and style_choice [ec_decode $style_choice "" "is null" "= :style_choice"]))"
 
 db_release_unused_handles
-ad_returnredirect shopping-cart.tcl?[export_url_vars product_id]
+ad_returnredirect shopping-cart?[export_url_vars product_id]