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.9 -r1.10
--- openacs-4/packages/ecommerce/tcl/ecommerce-procs.tcl 31 Jan 2002 22:43:54 -0000 1.9
+++ openacs-4/packages/ecommerce/tcl/ecommerce-procs.tcl 16 Feb 2002 23:32:06 -0000 1.10
@@ -207,10 +207,10 @@
# current_location can be "Shopping Cart", "Your Account", "Home", or
# any category_id
-ad_proc ec_footer { {current_location ""} {category_id ""} {search_text ""} } { returns the ecommerce footer } {
+ad_proc ec_footer { {current_location ""} {category_id ""} {subcategory_id ""} {search_text ""} } { returns the ecommerce footer } {
set to_return "
-[ec_search_widget $category_id $search_text] "
+[ec_search_widget "$category_id|subcategory_id" $search_text]"
if { [string compare $current_location "Shopping Cart"] == 0 } {
append to_return "Shopping Cart"
} else {
@@ -741,9 +741,14 @@
set linked_category_list ""
set current_location [lindex $current_location 1]
- foreach step {Welcome Address Verify Shipping Payment Confirm} {
+ set steps {"Select Address" "Verify Order"}
+ if { [ad_parameter -package_id [ec_id] ExpressShippingP ecommerce] } {
+ lappend steps "Select Shipping"
+ }
+ lappend steps "Payment Info" "Confirm Order"
+ foreach step $steps {
set category_descriptions Checkout:
- ns_log debug "ec_navbar $current_location ::: $step"
+
if {[string equal -nocase $current_location $step]} {
lappend linked_category_list "$step"
} else {
@@ -1407,7 +1412,7 @@
ad_proc ec_get_user_session_id {} { Gets the user session from cookies } {
set headers [ns_conn headers]
set cookie [ns_set get $headers Cookie]
- ns_log notice "cookie : $cookie"
+
# grab the user_session_id from the cookie
if { [regexp {user_session_id=([^;]+)} $cookie match user_session_id] } {
return $user_session_id