Index: openacs-4/packages/ecommerce/www/billing.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/billing.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/ecommerce/www/billing.tcl	26 May 2002 05:09:57 -0000	1.1
+++ openacs-4/packages/ecommerce/www/billing.tcl	15 Sep 2002 01:50:50 -0000	1.2
@@ -106,6 +106,7 @@
 # information
 
 set address_type "billing"
+set referer "billing"
 
 # Present all saved addresses
 
@@ -117,8 +118,8 @@
 
     set row(formatted) [ec_display_as_html [ec_pretty_mailing_address_from_ec_addresses $row(address_id)]]
     set address_id $row(address_id)
-    set row(delete) "[export_form_vars address_id]"
-    set row(edit) "[export_form_vars address_id address_type]"
+    set row(delete) "[export_form_vars address_id referer]"
+    set row(edit) "[export_form_vars address_id address_type referer]"
     set row(use) "[export_form_vars address_id]"
 }
 
@@ -135,6 +136,6 @@
 	set row(use) "[export_form_vars address_id]"
     }
 }
-set hidden_form_vars [export_form_vars address_type]
+set hidden_form_vars [export_form_vars address_type referer]
 
 db_release_unused_handles