Index: openacs-4/contrib/packages/events/www/order-cancel.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/events/www/order-cancel.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/packages/events/www/order-cancel.tcl 9 Mar 2003 12:08:08 -0000 1.1 +++ openacs-4/contrib/packages/events/www/order-cancel.tcl 9 Mar 2003 16:27:28 -0000 1.2 @@ -57,7 +57,7 @@ -label "Your Name" \ -datatype text \ -widget inform \ - -value "
$reg_info(user_name) \[not you? login as somebody else\]
" + -value "
$reg_info(user_name) (Not you? Login as somebody else)
" element create confirm_cancel inform_of_cancel \ -label "Action" \ @@ -75,7 +75,8 @@ -label "Are you sure you want to cancel?" \ -datatype text \ -widget radio \ - -options {{yes t} {no f}} + -options {{Yes t} {No f}} \ + -value f if {[template::form is_valid confirm_cancel]} { template::form get_values confirm_cancel reg_id confirm_p