Index: openacs-4/packages/ecommerce/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/index.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/ecommerce/www/index.tcl 10 Dec 2002 20:06:18 -0000 1.5
+++ openacs-4/packages/ecommerce/www/index.tcl 8 Mar 2004 19:46:11 -0000 1.6
@@ -55,7 +55,7 @@
set search_widget ""
}
-set recommendations_if_there_are_any "
"
+set recommendations_if_there_are_any ""
if [ad_parameter -package_id [ec_id] UserClassApproveP ecommerce] {
set user_class_approved_p_clause "and user_class_approved_p = 't'"
@@ -77,7 +77,7 @@
and r.active_p='t'" {
append recommendations_if_there_are_any "
-
+
[ec_linked_thumbnail_if_it_exists $dirname "f" "t"] |
$product_name
@@ -86,13 +86,13 @@
| [ec_price_line $product_id $user_id $offer_code] |
"
}
-if {[string equal $recommendations_if_there_are_any ""]} {
+if {[string equal $recommendations_if_there_are_any ""]} {
set recommendations_if_there_are_any ""
} else {
append recommendations_if_there_are_any "
"
}
-set products ""
+set products ""
set have_how_many_more_p f
set count 0
@@ -128,7 +128,7 @@
set have_how_many_more_p f
}
}
-if {[string equal $products ""]} {
+if {[string equal $products ""]} {
set products ""
} else {
append products "
"