Index: openacs-4/packages/ecommerce/tcl/ecds-ex-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/tcl/ecds-ex-procs.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/ecommerce/tcl/ecds-ex-procs.tcl 9 Aug 2008 07:11:51 -0000 1.1 +++ openacs-4/packages/ecommerce/tcl/ecds-ex-procs.tcl 12 Feb 2009 06:26:14 -0000 1.2 @@ -91,6 +91,9 @@ reurns unit_price from content of a vendor's product page } { set unit_price $page + # add markup + set unit_price [expr { 2.2 * pow( $unit_price , 0.931701 ) } ] + return $unit_price }