Index: openacs-4/packages/ecommerce/www/admin/orders/address-add-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/admin/orders/address-add-2.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/ecommerce/www/admin/orders/address-add-2.tcl	9 Mar 2004 00:59:50 -0000	1.5
+++ openacs-4/packages/ecommerce/www/admin/orders/address-add-2.tcl	16 Aug 2008 21:13:48 -0000	1.6
@@ -25,24 +25,8 @@
 
 ad_require_permission [ad_conn package_id] admin
 
-doc_body_append "
-    [ad_admin_header "Confirm Shipping Address"]
+set title "Confirm Shipping Address"
+set context [list [list index "Orders / Shipments / Refunds"] $title]
 
-    <h2>Confirm Shipping Address</h2>
-
-    [ad_context_bar [list "../" "Ecommerce([ec_system_name])"] [list "index" "Orders"] [list "one?[export_url_vars order_id]" "One Order"] "Confirm Shipping Address"]
-
-    <hr>
-    <p>Please confirm new address:</p>
-    <blockquote>"
-
-doc_body_append "
-      [ec_display_as_html [ec_pretty_mailing_address_from_args $line1 $line2 $city $usps_abbrev $zip_code $country_code $full_state_name $attn $phone $phone_time]]
-    </blockquote>
-    <form method=post action=address-add-3>
-      [export_entire_form]
-      <center>
-        <input type=submit value=\"Confirm\">
-      </center>
-    </form>
-    [ad_admin_footer]"
+set export_entire_form_html [export_entire_form]
+set pretty_mailing_address_html "[ec_display_as_html [ec_pretty_mailing_address_from_args $line1 $line2 $city $usps_abbrev $zip_code $country_code $full_state_name $attn $phone $phone_time]]"