Index: openacs-4/packages/ecommerce/tcl/ecommerce-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/tcl/ecommerce-procs.tcl,v diff -u -r1.10 -r1.11 --- openacs-4/packages/ecommerce/tcl/ecommerce-procs.tcl 16 Feb 2002 23:32:06 -0000 1.10 +++ openacs-4/packages/ecommerce/tcl/ecommerce-procs.tcl 21 Feb 2002 21:07:15 -0000 1.11 @@ -208,16 +208,15 @@ # current_location can be "Shopping Cart", "Your Account", "Home", or # any category_id ad_proc ec_footer { {current_location ""} {category_id ""} {subcategory_id ""} {search_text ""} } { returns the ecommerce footer } { - set to_return "
-
-[ec_search_widget "$category_id|subcategory_id" $search_text]" + set to_return " +
+
+ [ec_search_widget "$category_id|$subcategory_id" $search_text]" if { [string compare $current_location "Shopping Cart"] == 0 } { append to_return "Shopping Cart" } else { append to_return "Shopping Cart" } -# append to_return " Insecure Shopping Cart " -# append to_return " Secure Shopping Cart " append to_return " | " if { [string compare $current_location "Your Account"] == 0 } { append to_return "Your Account" @@ -235,12 +234,11 @@ } else { set ds_link "" } -# [ad_site_home_link] append to_return "
- [ad_system_name] -
-
- $ds_link" + [ad_system_name] +
+
+ $ds_link" return $to_return }