Index: openacs-4/packages/ecommerce/www/review-submit-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/review-submit-2.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/ecommerce/www/review-submit-2.tcl	20 Apr 2001 20:51:13 -0000	1.1
+++ openacs-4/packages/ecommerce/www/review-submit-2.tcl	26 May 2002 04:36:50 -0000	1.2
@@ -1,14 +1,17 @@
-#  www/ecommerce/review-submit-2.tcl
 ad_page_contract {
+
     @param product_id:integer
     @param rating
     @param one_line_summary
     @param user_comment
     @param usca_p:optional
-  @author
-  @creation-date
-  @cvs-id review-submit-2.tcl,v 3.3.2.8 2000/08/18 21:46:35 stevenp Exp
-  @author ported by Jerry Asher (jerry@theashergroup.com)
+
+    @author
+    @creation-date
+    @author ported by Jerry Asher (jerry@theashergroup.com)
+    @author revised by Bart Teeuwisse <bart.teeuwisse@7-sisters.com>
+    @revision-date April 2002
+
 } {
     product_id:integer
     rating:notnull
@@ -19,11 +22,8 @@
 
 # we need them to be logged in
 set user_id [ad_verify_and_get_user_id]
-
 if {$user_id == 0} {
-    
     set return_url "[ad_conn url]?[export_entire_form_as_url_vars]"
-
     ad_returnredirect "/register?[export_url_vars return_url]"
     return
 }
@@ -42,10 +42,9 @@
 }
 
 # user session tracking
-set user_session_id [ec_get_user_session_id]
 
+set user_session_id [ec_get_user_session_id]
 ec_create_new_session_if_necessary [export_entire_form_as_url_vars]
-# type2
 
 db_1row get_product_and_user_info "
     select product_name,
@@ -56,19 +55,16 @@
          (select email as user_email
           from   cc_users
           where  user_id = :user_id)
-    where product_id=:product_id
-"
+    where product_id=:product_id"
 
 set hidden_form_variables [export_form_vars product_id rating one_line_summary user_comment comment_id]
-
-set review_as_it_will_appear "<b><a href=\"/shared/community-member?[export_url_vars user_id]\">$user_email</a></b> 
+set review_as_it_will_appear "
+<b><a href=\"/shared/community-member?[export_url_vars user_id]\">$user_email</a></b> 
 rated this product  
 [ec_display_rating $rating] on <i>$current_date</i> and wrote:<br>
 <b>$one_line_summary</b><br>
-[ec_display_as_html $user_comment]
-"
+[ec_display_as_html $user_comment]"
 
 set system_name [ad_system_name]
 db_release_unused_handles
-ec_return_template
-
+ad_return_template