Index: openacs-4/packages/ecommerce/www/admin/orders/one.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/admin/orders/one.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/ecommerce/www/admin/orders/one.tcl 9 Mar 2004 00:59:50 -0000 1.4 +++ openacs-4/packages/ecommerce/www/admin/orders/one.tcl 9 Aug 2008 10:33:13 -0000 1.5 @@ -142,7 +142,7 @@ set item_quantity [expr $item_quantity + $quantity] set item_description " $product_name; - [ec_decode $options "" "" "$options; "]$price_name: [ec_pretty_price $price_charged]" + [ec_decode $options "" "" "$options; "]$price_name: [ec_pretty_pure_price $price_charged]" set old_product_color_size_style_price_price_name [list $product_id $color_choice $size_choice $style_choice $price_charged $price_name] } @@ -226,7 +226,7 @@ Base shipping charged - [ec_pretty_price $shipping_charged] [ec_decode $shipping_method "pickup" "(Pickup)" "no shipping" "(No Shipping)" ""] + [ec_pretty_pure_price $shipping_charged] [ec_decode $shipping_method "pickup" "(Pickup)" "no shipping" "(No Shipping)" ""] @@ -265,7 +265,7 @@ $transaction_id [ec_nbsp_if_null [ec_formatted_full_date $inserted_date]] $creditcard_last_four - [ec_pretty_price $transaction_amount] + [ec_pretty_pure_price $transaction_amount] [ec_decode $transaction_type "charge" "authorization to charge" "intent to refund"] [ec_nbsp_if_null [ec_decode $transaction_type "refund" "Yes" [ec_decode $to_be_captured_p "t" "Yes" "f" "No" ""]]] [ec_nbsp_if_null [ec_formatted_full_date $authorized_date]] @@ -356,7 +356,7 @@ doc_body_append " Refund ID: $refund_id
Date: [ec_formatted_full_date $refund_date]
- Amount: [ec_pretty_price $refund_amount]
+ Amount: [ec_pretty_pure_price $refund_amount]
Refunded by: $first_names $last_name
Reason: $refund_reasons