Index: openacs-4/packages/dotlrn-ecommerce/www/ecommerce/finalize-order.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/www/ecommerce/finalize-order.tcl,v diff -u -r1.6 -r1.7 --- openacs-4/packages/dotlrn-ecommerce/www/ecommerce/finalize-order.tcl 3 Aug 2005 22:46:40 -0000 1.6 +++ openacs-4/packages/dotlrn-ecommerce/www/ecommerce/finalize-order.tcl 5 Aug 2005 05:40:09 -0000 1.7 @@ -249,8 +249,6 @@ if {$hard_goods_cost > 0} { - ns_log notice "DEBUG:: hard" - # The order contains hard goods that come at a cost. if {$soft_goods_cost > 0} { @@ -769,6 +767,7 @@ (:creditcard_id, :transaction_id, :order_id, :transaction_amount, 'charge', sysdate)" array set response [ec_creditcard_authorization $order_id $transaction_id] + set result $response(response_code) set transaction_id $response(transaction_id) if { [string equal $result "authorized"] } {