Fisheye: Tag 1.3 refers to a dead (removed) revision in file `openacs-4/packages/ecommerce/www/address-2.adp'.
Fisheye: No comparison available.  Pass `N' to diff?
Index: openacs-4/packages/ecommerce/www/address-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/address-2.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/ecommerce/www/address-2.tcl	26 May 2002 05:09:57 -0000	1.1
+++ openacs-4/packages/ecommerce/www/address-2.tcl	15 Sep 2002 01:50:50 -0000	1.2
@@ -9,7 +9,7 @@
     @param zip_code
     @param phone
     @param phone_time:optional
-    @param action
+    @param referer
 
     @author
     @creation-date
@@ -28,7 +28,7 @@
     zip_code
     phone
     phone_time:optional
-    action
+    referer
 }
 
 set possible_exception_list [list [list attn name] [list line1 address] [list city city] [list usps_abbrev state] [list zip_code "zip code"] [list phone "telephone number"]]
@@ -66,7 +66,7 @@
     from ec_orders 
     where user_session_id = :user_session_id 
     and order_state = 'in_basket'" -default ""]
-if { $action != "https://www.7-sisters.com:8443/store/gift-certificate-billing" } {
+if { $referer != "gift-certificate-billing" } {
     if { [empty_string_p $order_id] } {
 
 	# They probably got here by pushing "Back", so just redirect
@@ -111,11 +111,7 @@
     }
 }
 
-set formatted_address [ec_display_as_html [ec_pretty_mailing_address_from_args $line1 $line2 $city $usps_abbrev $zip_code "US" \
-						"" $attn $phone $phone_time]]
-set hidden_form_vars ""
-set form_set [ns_getform]
-for {set i 0} {$i < [ns_set size $form_set]} {incr i} {
-    set [ns_set key $form_set $i] [ns_set value $form_set $i]
-    append hidden_form_vars "[export_form_vars [ns_set key $form_set $i]]"
-}
+# Return to the calling page (E.g. checkout, billing,
+# giftcertificate-billing).
+
+rp_internal_redirect $referer
Fisheye: Tag 1.3 refers to a dead (removed) revision in file `openacs-4/packages/ecommerce/www/address-international-2.adp'.
Fisheye: No comparison available.  Pass `N' to diff?
Index: openacs-4/packages/ecommerce/www/address-international-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/address-international-2.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/ecommerce/www/address-international-2.tcl	26 May 2002 05:09:57 -0000	1.1
+++ openacs-4/packages/ecommerce/www/address-international-2.tcl	15 Sep 2002 01:50:50 -0000	1.2
@@ -8,7 +8,7 @@
     @param country_code
     @param phone
     @param phone_time:optional
-    @param action
+    @param referer
 
     @author
     @creation-date
@@ -27,8 +27,8 @@
     zip_code:optional
     country_code:notnull
     phone
-    phone_time:optional
-    action
+    {phone_time ""}
+    referer
 }
 
 set possible_exception_list [list [list attn name] [list line1 address] [list city city] [list country_code country] [list phone "telephone number"]]
@@ -106,11 +106,7 @@
     db_release_unused_handles
 }
 
-set formatted_address [ec_display_as_html [ec_pretty_mailing_address_from_args $line1 $line2 $city "" $zip_code $country_code \
-						$full_state_name $attn $phone $phone_time]]
-set hidden_form_vars ""
-set form_set [ns_getform]
-for {set i 0} {$i < [ns_set size $form_set]} {incr i} {
-    set [ns_set key $form_set $i] [ns_set value $form_set $i]
-    append hidden_form_vars "[export_form_vars [ns_set key $form_set $i]]"
-}
+# Return to the calling page (E.g. checkout, billing,
+# giftcertificate-billing).
+
+rp_internal_redirect $referer
Index: openacs-4/packages/ecommerce/www/address-international.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/address-international.adp,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/ecommerce/www/address-international.adp	5 Aug 2002 12:41:25 -0000	1.2
+++ openacs-4/packages/ecommerce/www/address-international.adp	15 Sep 2002 01:50:50 -0000	1.3
@@ -6,7 +6,7 @@
   <h2>Enter Your Shipping Address</h2>
 </if>
 <else>
-  <if @action@ ne "gift-certificate-billing">
+  <if @referer@ ne "gift-certificate-billing">
     <property name="navbar">checkout {Select Billing Address}</property>
   </if>
   <h2>Enter Your Billing Address</h2>
Index: openacs-4/packages/ecommerce/www/address-international.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/address-international.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/ecommerce/www/address-international.tcl	5 Aug 2002 12:41:25 -0000	1.2
+++ openacs-4/packages/ecommerce/www/address-international.tcl	15 Sep 2002 01:50:50 -0000	1.3
@@ -2,6 +2,7 @@
     @param address_type
     @param usca_p:optional
     @param address_id:optional
+    @param referer
 
     @author
     @creation-date
@@ -13,6 +14,7 @@
     address_type
     usca_p:optional
     address_id:optional
+    referer
 }
 
 # we need them to be logged in
@@ -46,18 +48,10 @@
 	where user_id=:user_id"]]
 }
 
-# Get the location from which delete-address was called.
-
-set header_set [ns_conn headers]
-set action [ns_set get [ns_conn headers] Referer]
-# This will set "action" to be "foo" out of "http://bar.com/baz/foo"
-set action [string range $action [expr [string last "/" $action] +1] end]
-
 # Get the form vars that were passed on delete-address so that they
 # can be passed back to the calling url. gift-certificate-billing has
 # a bunch of form vars that should not be lost.
 
-set hidden_form_vars "[export_form_vars action]"
 set form_set [ns_getform]
 for {set i 0} {$i < [ns_set size $form_set]} {incr i} {
     set [ns_set key $form_set $i] [ns_set value $form_set $i]
Index: openacs-4/packages/ecommerce/www/address.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/address.adp,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/ecommerce/www/address.adp	12 Sep 2002 22:39:05 -0000	1.3
+++ openacs-4/packages/ecommerce/www/address.adp	15 Sep 2002 01:50:50 -0000	1.4
@@ -7,13 +7,13 @@
 </if>
 <else>
   <property name="title">Enter Your Billing Address</property>
-  <if @action@ ne "gift-certificate-billing">
+  <if @referer@ ne "gift-certificate-billing">
     <property name="navbar">checkout {Select Billing Address}</property>
   </if>
   <h2>Enter Your Billing Address</h2>
 </else>
 
-<form method="post" action="address-2.tcl">
+<form method="post" action="address-2">
     @hidden_form_vars@
     <blockquote>
       <table>
Index: openacs-4/packages/ecommerce/www/address.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/address.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/ecommerce/www/address.tcl	5 Aug 2002 12:41:25 -0000	1.2
+++ openacs-4/packages/ecommerce/www/address.tcl	15 Sep 2002 01:50:50 -0000	1.3
@@ -2,6 +2,7 @@
     @param address_type
     @param usca_p:optional
     @param address_id:optional
+    @param referer
 
     @author
     @creation-date
@@ -13,6 +14,7 @@
     address_type
     usca_p:optional
     address_id:optional
+    referer
 }
 
 ec_redirect_to_https_if_possible_and_necessary
@@ -64,18 +66,17 @@
 ec_create_new_session_if_necessary
 ec_log_user_as_user_id_for_this_session
 
-# Get the location from which delete-address was called.
+# Get the location from which address was called.
 
-set header_set [ns_conn headers]
-set action [ns_set get [ns_conn headers] Referer]
-# This will set "action" to be "foo" out of "http://bar.com/baz/foo"
-set action [string range $action [expr [string last "/" $action] + 1] end]
+# set header_set [ns_conn headers]
+# set referer [ns_set get [ns_conn headers] Referer]
+# # This will set "referer" to be "foo" out of "http://bar.com/baz/foo"
+# set referer [string range $referer [expr [string last "/" $referer] + 1] end]
 
 # Get the form vars that were passed on delete-address so that they
 # can be passed back to the calling url. gift-certificate-billing has
 # a bunch of form vars that should not be lost.
 
-set hidden_form_vars "[export_form_vars action]"
 set form_set [ns_getform]
 for {set i 0} {$i < [ns_set size $form_set]} {incr i} {
     set [ns_set key $form_set $i] [ns_set value $form_set $i]
Index: openacs-4/packages/ecommerce/www/billing.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/billing.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/ecommerce/www/billing.adp	26 May 2002 05:09:57 -0000	1.1
+++ openacs-4/packages/ecommerce/www/billing.adp	15 Sep 2002 01:50:50 -0000	1.2
@@ -105,7 +105,7 @@
 	or
       </td>
       <td>
-	<form method="post" action="address">
+	<form method="post" action="address-international">
 	  @hidden_form_vars@
 	  <input type="submit" value="Enter a new INTERNATIONAL address">
 	</form>
Index: openacs-4/packages/ecommerce/www/billing.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/billing.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/ecommerce/www/billing.tcl	26 May 2002 05:09:57 -0000	1.1
+++ openacs-4/packages/ecommerce/www/billing.tcl	15 Sep 2002 01:50:50 -0000	1.2
@@ -106,6 +106,7 @@
 # information
 
 set address_type "billing"
+set referer "billing"
 
 # Present all saved addresses
 
@@ -117,8 +118,8 @@
 
     set row(formatted) [ec_display_as_html [ec_pretty_mailing_address_from_ec_addresses $row(address_id)]]
     set address_id $row(address_id)
-    set row(delete) "[export_form_vars address_id]"
-    set row(edit) "[export_form_vars address_id address_type]"
+    set row(delete) "[export_form_vars address_id referer]"
+    set row(edit) "[export_form_vars address_id address_type referer]"
     set row(use) "[export_form_vars address_id]"
 }
 
@@ -135,6 +136,6 @@
 	set row(use) "[export_form_vars address_id]"
     }
 }
-set hidden_form_vars [export_form_vars address_type]
+set hidden_form_vars [export_form_vars address_type referer]
 
 db_release_unused_handles
Index: openacs-4/packages/ecommerce/www/checkout.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/checkout.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/ecommerce/www/checkout.tcl	13 Sep 2002 02:03:57 -0000	1.6
+++ openacs-4/packages/ecommerce/www/checkout.tcl	15 Sep 2002 01:50:50 -0000	1.7
@@ -57,6 +57,11 @@
 
     set shipping_required true
 
+    # Set the referer to the name of this page so that the user
+    # returns to this page when the changes to the address have been
+    # checked.
+
+    set referer checkout
     # Present all saved addresses
 
     template::query get_user_addresses addresses multirow "
@@ -68,11 +73,11 @@
 	set row(formatted) [ec_display_as_html [ec_pretty_mailing_address_from_args $row(line1) $row(line2) $row(city) $row(usps_abbrev) $row(zip_code) $row(country_code) \
 						    $row(full_state_name) $row(attn) $row(phone) $row(phone_time)]]
 	set address_id $row(address_id)
-	set row(delete) "[export_form_vars address_id]"
-	set row(edit) "[export_form_vars address_id address_type]"
+	set row(delete) "[export_form_vars address_id referer]"
+	set row(edit) "[export_form_vars address_id address_type referer]"
 	set row(use) "[export_form_vars address_id]"
     }
-    set hidden_form_vars [export_form_vars address_type]
+    set hidden_form_vars [export_form_vars address_type referer]
 
 } else {
     set shipping_required false
Index: openacs-4/packages/ecommerce/www/checkout.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/checkout.xql,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/ecommerce/www/checkout.xql	26 May 2002 04:36:50 -0000	1.2
+++ openacs-4/packages/ecommerce/www/checkout.xql	15 Sep 2002 01:50:50 -0000	1.3
@@ -2,6 +2,17 @@
 
 <queryset>
 
+  <fullquery name="shipping_avail">      
+    <querytext>
+      select p.no_shipping_avail_p
+      from ec_items i, ec_products p
+      where i.product_id = p.product_id
+      and p.no_shipping_avail_p = 'f' 
+      and i.order_id = :order_id
+      group by no_shipping_avail_p
+    </querytext>
+  </fullquery>
+
   <fullquery name="get_order_id">      
     <querytext>
       select order_id 
Fisheye: Tag 1.2 refers to a dead (removed) revision in file `openacs-4/packages/ecommerce/www/delete-address.adp'.
Fisheye: No comparison available.  Pass `N' to diff?
Index: openacs-4/packages/ecommerce/www/delete-address.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/delete-address.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/ecommerce/www/delete-address.tcl	5 Aug 2002 12:41:25 -0000	1.2
+++ openacs-4/packages/ecommerce/www/delete-address.tcl	15 Sep 2002 01:50:50 -0000	1.3
@@ -4,11 +4,13 @@
     it will no longer be available.
 
     @param address_id
+    @param referer
 
     @author Bart Teeuwisse <bart.teeuwisse@7-sisters.com>
     @creation-date April 2002
 } {
     address_id
+    referer
 }
 
 # Can't remove the address from the database as old orders might refer
@@ -28,23 +30,9 @@
 
 set deleted_address [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]]
+db_release_unused_handles
 
-# Get the location from which delete-address was called.
+# Return to the calling page (E.g. checkout, billing,
+# giftcertificate-billing).
 
-set header_set [ns_conn headers]
-set action [ns_set get [ns_conn headers] Referer]
-# This will set "action" to be "foo" out of "http://bar.com/baz/foo"
-set action [string range $action [expr [string last "/" $action] + 1] end]
-
-# Get the form vars that were passed on delete-address so that they
-# can be passed back to the calling url. gift-certificate-billing has
-# a bunch of form vars that should not be lost.
-
-set hidden_form_vars ""
-set form_set [ns_getform]
-for {set i 0} {$i < [ns_set size $form_set]} {incr i} {
-    set [ns_set key $form_set $i] [ns_set value $form_set $i]
-    append hidden_form_vars "[export_form_vars [ns_set key $form_set $i]]"
-}
-
-db_release_unused_handles
+rp_internal_redirect $referer
Index: openacs-4/packages/ecommerce/www/gift-certificate-billing.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/gift-certificate-billing.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/ecommerce/www/gift-certificate-billing.tcl	26 May 2002 05:09:57 -0000	1.1
+++ openacs-4/packages/ecommerce/www/gift-certificate-billing.tcl	15 Sep 2002 01:50:50 -0000	1.2
@@ -91,6 +91,7 @@
 # Present all saved addresses
 
 set address_type "billing"
+set referer "gift-certificate-billing"
 
 template::query get_user_addresses addresses multirow "
     select address_id, attn, line1, line2, city, usps_abbrev, zip_code, phone, country_code, full_state_name, phone_time, address_type
@@ -101,9 +102,9 @@
     set row(formatted) [ec_display_as_html [ec_pretty_mailing_address_from_args $row(line1) $row(line2) $row(city) $row(usps_abbrev) $row(zip_code) $row(country_code) \
 						$row(full_state_name) $row(attn) $row(phone) $row(phone_time)]]
     set address_id $row(address_id)
-    set row(delete) "[export_form_vars address_id certificate_to certificate_from certificate_message amount recipient_email]"
-    set row(edit) "[export_form_vars address_id address_type certificate_to certificate_from certificate_message amount recipient_email]"
+    set row(delete) "[export_form_vars address_id certificate_to certificate_from certificate_message amount recipient_email referer]"
+    set row(edit) "[export_form_vars address_id address_type certificate_to certificate_from certificate_message amount recipient_email referer]"
     set row(use) "[export_form_vars address_id certificate_to certificate_from certificate_message amount recipient_email]"
 }
 
-set hidden_form_vars [export_form_vars address_type certificate_to certificate_from certificate_message amount recipient_email]
+set hidden_form_vars [export_form_vars address_type certificate_to certificate_from certificate_message amount recipient_email referer]
Index: openacs-4/packages/ecommerce/www/payment.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/payment.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/ecommerce/www/payment.adp	26 May 2002 05:09:57 -0000	1.1
+++ openacs-4/packages/ecommerce/www/payment.adp	15 Sep 2002 01:50:50 -0000	1.2
@@ -25,7 +25,7 @@
     </else>
 
     <if @gift_certificate_covers_whole_order@ false>
-      <p><a href="gift-certificate-claim.tcl?address_id=@billing_address_id@">Click here to claim a
+      <p><a href="gift-certificate-claim?address_id=@billing_address_id@">Click here to claim a
       new gift certificate</a></p>
 
       <if @customer_can_use_old_credit_cards@ true>
Index: openacs-4/packages/ecommerce/www/process-order-quantity-shipping.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/process-order-quantity-shipping.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/ecommerce/www/process-order-quantity-shipping.tcl	27 May 2002 03:15:12 -0000	1.5
+++ openacs-4/packages/ecommerce/www/process-order-quantity-shipping.tcl	15 Sep 2002 01:50:50 -0000	1.6
@@ -84,7 +84,7 @@
     # Then they probably got here by pushing "Back", so just redirect
     # them to index.tcl
 
-    ad_returnredirect index.tcl
+    ad_returnredirect index
     return
 }
 
@@ -96,7 +96,7 @@
     select count(*) 
     from ec_items
     where order_id = :order_id"] == 0 } {
-    ad_returnredirect shopping-cart.tcl
+    ad_returnredirect shopping-cart
     db_release_unused_handles
     return
 }
@@ -111,7 +111,7 @@
     where order_id = :order_id"]
 
 if { $order_owner != $user_id } {
-    ad_returnredirect checkout.tcl
+    ad_returnredirect checkout
     return
 }
 
@@ -136,7 +136,7 @@
 	and i.order_id = :order_id
 	group by no_shipping_avail_p"]} {
 
-	ad_returnredirect checkout.tcl
+	ad_returnredirect checkout
 	return
     }
 }
@@ -284,4 +284,4 @@
     where order_id=:order_id"
 
 db_release_unused_handles
-ad_returnredirect billing.tcl
+ad_returnredirect billing
Index: openacs-4/packages/ecommerce/www/review-submit-2.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/review-submit-2.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/ecommerce/www/review-submit-2.adp	26 May 2002 05:09:57 -0000	1.1
+++ openacs-4/packages/ecommerce/www/review-submit-2.adp	15 Sep 2002 01:50:50 -0000	1.2
@@ -4,7 +4,7 @@
 <h2>Check your review of @product_name@</h2>
 
 <blockquote>
-  <form method="post" action="review-submit-3.tcl">
+  <form method="post" action="review-submit-3">
     @hidden_form_variables@
     <p>Here is your review the way it will appear:</p>
     <hr>
@@ -17,4 +17,4 @@
       <input type="submit" value="Submit your review">
     </center>
   </form>
-</blockquote>
\ No newline at end of file
+</blockquote>
Index: openacs-4/packages/ecommerce/www/review-submit.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/review-submit.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/ecommerce/www/review-submit.adp	26 May 2002 05:09:57 -0000	1.1
+++ openacs-4/packages/ecommerce/www/review-submit.adp	15 Sep 2002 01:50:50 -0000	1.2
@@ -3,7 +3,7 @@
 
 <h2>Write your own review of @product_name@</h2>
 
-<form method="post" action="review-submit-2.tcl">
+<form method="post" action="review-submit-2">
   <input type="hidden" name="product_id" value="@product_id@">
   <ol>
     <li>
Index: openacs-4/packages/ecommerce/www/select-shipping.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/select-shipping.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/ecommerce/www/select-shipping.tcl	6 Aug 2002 14:09:09 -0000	1.4
+++ openacs-4/packages/ecommerce/www/select-shipping.tcl	15 Sep 2002 01:50:50 -0000	1.5
@@ -50,7 +50,7 @@
     # No rows came back, so they probably got here by pushing "Back",
     # so just redirect them to index.tcl
 
-    ad_returnredirect [ec_url]index.tcl
+    ad_returnredirect [ec_url]index
     return
 } 
 
@@ -65,7 +65,7 @@
     # If they get here, either they managed to skip past checkout.tcl,
     # or they messed w/their user_session_id cookie;
 
-    ad_returnredirect [ec_securelink [ec_url]checkout.tcl]
+    ad_returnredirect [ec_securelink [ec_url]checkout]
     return
 }
 
Index: openacs-4/packages/ecommerce/www/shopping-cart-retrieve-3.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/shopping-cart-retrieve-3.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/ecommerce/www/shopping-cart-retrieve-3.adp	26 May 2002 05:09:57 -0000	1.1
+++ openacs-4/packages/ecommerce/www/shopping-cart-retrieve-3.adp	15 Sep 2002 01:50:50 -0000	1.2
@@ -5,7 +5,7 @@
 
 <blockquote>
   <if @page_function@ eq "view">
-    <form method=post action="shopping-cart-retrieve-3.tcl">
+    <form method=post action="shopping-cart-retrieve-3">
       @hidden_form_variables@
       <input type=submit name=submit value="Retrieve">
       <input type=submit name=submit value="Discard">
@@ -22,7 +22,7 @@
   </if>
 
   <if @page_function@ eq "retrieve">
-    <form method=post action="shopping-cart-retrieve-3.tcl">
+    <form method=post action="shopping-cart-retrieve-3">
       <%= [export_form_vars order_id] %>
       <p>You currently already have a shopping cart. Would you like to
       merge your current shopping cart with the shopping cart you are
@@ -36,7 +36,7 @@
   </if>
 
   <if @page_function@ eq "discard">
-    <form method=post action="shopping-cart-retrieve-3.tcl">
+    <form method=post action="shopping-cart-retrieve-3">
     @hidden_form_variables@
     <p>If you discard this shopping cart, it will never be
     retrievable.  Are you sure you want to discard it?</p>
@@ -47,4 +47,4 @@
     </form>
   </if>
 
-</blockquote>
\ No newline at end of file
+</blockquote>
Index: openacs-4/packages/ecommerce/www/shopping-cart-retrieve.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/shopping-cart-retrieve.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/ecommerce/www/shopping-cart-retrieve.adp	26 May 2002 05:09:57 -0000	1.1
+++ openacs-4/packages/ecommerce/www/shopping-cart-retrieve.adp	15 Sep 2002 01:50:50 -0000	1.2
@@ -7,9 +7,9 @@
   <p>We think that you are @user_name@.  If not, please <a
   href="@register_link@">log in</a>.</p>
   <p>Otherwise,</p>
-  <form method=post action="shopping-cart-retrieve-2.tcl">
+  <form method=post action="shopping-cart-retrieve-2">
     <center>
       <input type=submit value="Continue">
     </center>
   </form>
-</blockquote>
\ No newline at end of file
+</blockquote>
Index: openacs-4/packages/ecommerce/www/shopping-cart-save-2.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/shopping-cart-save-2.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/ecommerce/www/shopping-cart-save-2.adp	26 May 2002 05:09:57 -0000	1.1
+++ openacs-4/packages/ecommerce/www/shopping-cart-save-2.adp	15 Sep 2002 01:50:50 -0000	1.2
@@ -9,4 +9,4 @@
   @cart_duration@ days.</p>
 </blockquote>
 
-<p><a href="index.tcl">Continue Shopping</a></p>
\ No newline at end of file
+<p><a href="index">Continue Shopping</a></p>
Index: openacs-4/packages/ecommerce/www/shopping-cart-save.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/shopping-cart-save.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/ecommerce/www/shopping-cart-save.adp	26 May 2002 05:09:57 -0000	1.1
+++ openacs-4/packages/ecommerce/www/shopping-cart-save.adp	15 Sep 2002 01:50:50 -0000	1.2
@@ -6,9 +6,9 @@
 <blockquote>
   <p>We think that you are @user_name@.  If not, please <a
   href="@register_link@">log in</a>. Otherwise,</p>
-  <form method=post action="shopping-cart-save-2.tcl">
+  <form method=post action="shopping-cart-save-2">
     <center>
       <input type=submit value="Continue">
     </center>
   </form>
-</blockquote>
\ No newline at end of file
+</blockquote>
Index: openacs-4/packages/ecommerce/www/update-user-classes.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/update-user-classes.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/ecommerce/www/update-user-classes.adp	26 May 2002 05:09:57 -0000	1.1
+++ openacs-4/packages/ecommerce/www/update-user-classes.adp	15 Sep 2002 01:50:50 -0000	1.2
@@ -3,7 +3,7 @@
 <property name="navbar">Your Account</property>
 
 <blockquote>
-  <form method="post" action="update-user-classes-2.tcl">
+  <form method="post" action="update-user-classes-2">
     <if @user_classes_need_approval@ true>
       <p>Submit a request to be in the following user classes:</p>
     </if>
@@ -17,4 +17,4 @@
       <input type="submit" value="Done">
     </center>
   </form>
-</blockquote>
\ No newline at end of file
+</blockquote>
Index: openacs-4/packages/ecommerce/www/doc/audit.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/doc/audit.adp,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/ecommerce/www/doc/audit.adp	26 May 2002 04:36:50 -0000	1.2
+++ openacs-4/packages/ecommerce/www/doc/audit.adp	15 Sep 2002 01:50:49 -0000	1.3
@@ -1,5 +1,3 @@
-<!-- <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> -->
-
 <master>
   <property name=title>Audit Trail Package</property>
   <property name="signatory">@signatory@</property>
Index: openacs-4/packages/ecommerce/www/doc/ecommerce-technical.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/doc/ecommerce-technical.adp,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/ecommerce/www/doc/ecommerce-technical.adp	26 May 2002 04:36:50 -0000	1.2
+++ openacs-4/packages/ecommerce/www/doc/ecommerce-technical.adp	15 Sep 2002 01:50:49 -0000	1.3
@@ -1,5 +1,3 @@
-<!-- <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> -->
-
 <master>
   <property name=title>@title@</property>
   <property name="signatory">@signatory@</property>
Index: openacs-4/packages/ecommerce/www/doc/porting-diary.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/doc/porting-diary.adp,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/ecommerce/www/doc/porting-diary.adp	26 May 2002 04:36:50 -0000	1.2
+++ openacs-4/packages/ecommerce/www/doc/porting-diary.adp	15 Sep 2002 01:50:49 -0000	1.3
@@ -1,5 +1,3 @@
-<!-- <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> -->
-
 <master>
   <property name=title>@title@</property>
   <property name="signatory">@signatory@</property>
Index: openacs-4/packages/ecommerce/www/register/email-confirm.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/register/Attic/email-confirm.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/ecommerce/www/register/email-confirm.adp	20 Apr 2001 20:51:14 -0000	1.1
+++ openacs-4/packages/ecommerce/www/register/email-confirm.adp	15 Sep 2002 01:50:46 -0000	1.2
@@ -17,7 +17,7 @@
     </form>
     <p>
     Note: If you've forgotten your password, <a
-    href="email-password.tcl?user_id=@user_id@">ask this server to email it
+    href="email-password?user_id=@user_id@">ask this server to email it
     to @email@</a>.
 
   </if>
Index: openacs-4/packages/ecommerce/www/register/email-password-2.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/register/Attic/email-password-2.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/ecommerce/www/register/email-password-2.adp	20 Apr 2001 20:51:14 -0000	1.1
+++ openacs-4/packages/ecommerce/www/register/email-password-2.adp	15 Sep 2002 01:50:46 -0000	1.2
@@ -18,7 +18,7 @@
 </if>
 <else>
 
-<form method=POST action="email-password-3.tcl">
+<form method=POST action="email-password-3">
 <input type=hidden name=first_names value="@first_names@">
 <input type=hidden name=last_name value="@last_name@">
 <input type=hidden name=user_id value="@user_id@">
Index: openacs-4/packages/ecommerce/www/register/restore-user.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/register/Attic/restore-user.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/ecommerce/www/register/restore-user.adp	20 Apr 2001 20:51:14 -0000	1.1
+++ openacs-4/packages/ecommerce/www/register/restore-user.adp	15 Sep 2002 01:50:46 -0000	1.2
@@ -21,7 +21,7 @@
 <p>
 
 Note: If you've forgotten your password, <a
-href="email-password.tcl?user_id=@user_id@">ask this server to email it
+href="email-password?user_id=@user_id@">ask this server to email it
 to @email@</a>.