Index: openacs-4/packages/ecommerce/www/shopping-cart.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/shopping-cart.tcl,v
diff -u -r1.12.2.1 -r1.12.2.2
--- openacs-4/packages/ecommerce/www/shopping-cart.tcl	20 Dec 2004 10:25:24 -0000	1.12.2.1
+++ openacs-4/packages/ecommerce/www/shopping-cart.tcl	19 Feb 2005 11:12:40 -0000	1.12.2.2
@@ -57,8 +57,10 @@
 
 set product_counter 0
 set total_price 0
-set currency [ad_parameter -package_id [ec_id] Currency]
+set currency [parameter::get -parameter Currency]
+set max_quantity_length [string length [parameter::get -parameter CartMaxToAdd]]
 
+
 db_multirow -extend { line_subtotal } in_cart get_products_in_cart "
       select p.product_name, p.one_line_description, p.product_id, count(*) as quantity, u.offer_code, i.color_choice, i.size_choice, i.style_choice, '' as price 
       from ec_orders o