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.16 -r1.17 --- openacs-4/packages/ecommerce/tcl/ecommerce-procs.tcl 18 Sep 2002 21:33:44 -0000 1.16 +++ openacs-4/packages/ecommerce/tcl/ecommerce-procs.tcl 19 Sep 2002 03:02:20 -0000 1.17 @@ -192,43 +192,6 @@ return [ad_parameter -package_id [ec_id] ProductDataDirectory "" product/] } -# 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]" -# if { [string compare $current_location "Shopping Cart"] == 0 } { -# append to_return "Shopping Cart" -# } else { -# append to_return "Shopping Cart" -# } -# append to_return " | " -# if { [string compare $current_location "Your Account"] == 0 } { -# append to_return "Your Account" -# } else { -# append to_return "Your Account" -# } -# append to_return " | " -# if { [string compare $current_location Home] == 0 } { -# append to_return "[ec_system_name] Home" -# } else { -# append to_return "[ec_system_name] Home" -# } -# if { [llength [info procs ds_link]] == 1 } { -# set ds_link [ds_link] -# } else { -# set ds_link "" -# } -# append to_return "
-# [ad_system_name] -#
-#
-# $ds_link" -# return $to_return -# } - # For administrators ad_proc ec_shipping_cost_summary { base_shipping_cost default_shipping_per_item weight_shipping_cost add_exp_base_shipping_cost add_exp_amount_per_item add_exp_amount_by_weight } { returns cost summary } {