Index: openacs-4/packages/ecommerce/www/checkout-one-form.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/checkout-one-form.tcl,v
diff -u -N -r1.5 -r1.6
--- openacs-4/packages/ecommerce/www/checkout-one-form.tcl	4 Sep 2008 12:24:06 -0000	1.5
+++ openacs-4/packages/ecommerce/www/checkout-one-form.tcl	3 Dec 2008 10:05:22 -0000	1.6
@@ -141,8 +141,8 @@
 
     }
     set order_total_price_pre_gift_certificate $order_total    
+    set bom_total $order_total
 
-
     # Check if the order requires shipping
     
     if {[db_0or1row shipping_avail "
@@ -318,7 +318,7 @@
  
             # set base shipping charge
 
-            set order_shipping_cost $base_shipping_cost
+            set order_shipping_cost [expr { [ecds_base_shipping_price_from_order_value $bom_total $base_shipping_cost ] + $base_shipping_cost } ] 
 
             set shipping_method_standard $order_shipping_cost