Index: openacs.org-dev/packages/ecommerce/www/shopping-cart-retrieve.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/ecommerce/www/shopping-cart-retrieve.tcl,v
diff -u -r1.1.1.1 -r1.1.1.2
--- openacs.org-dev/packages/ecommerce/www/shopping-cart-retrieve.tcl	9 Jul 2002 17:35:05 -0000	1.1.1.1
+++ openacs.org-dev/packages/ecommerce/www/shopping-cart-retrieve.tcl	8 Oct 2002 15:47:06 -0000	1.1.1.2
@@ -18,7 +18,7 @@
 set return_url "[ec_url]shopping-cart-retrieve-2"
 if {$user_id == 0} {
     ad_returnredirect "/register?[export_url_vars return_url]"
-    return
+    ad_script_abort
 }
 
 # User session tracking
@@ -32,6 +32,8 @@
     where user_id=:user_id"]
 
 set register_link "/register?[export_url_vars return_url]"
+set context_bar [template::adp_parse [acs_root_dir]/packages/[ad_conn package_key]/www/contextbar [list context_addition [list "Retrieve Shopping Cart"]]]
+set ec_system_owner [ec_system_owner]
 
 db_release_unused_handles
 ad_return_template