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.2 -r1.3 --- openacs-4/contrib/packages/events/www/order-cancel.tcl 9 Mar 2003 16:27:28 -0000 1.2 +++ openacs-4/contrib/packages/events/www/order-cancel.tcl 1 Mar 2005 00:01:16 -0000 1.3 @@ -21,8 +21,8 @@ } } -set user_id [ad_verify_and_get_user_id] -ad_maybe_redirect_for_registration +set user_id [ad_conn user_id] +auth::require_login if { ![db_0or1row reg_exists {}] } { ad_return_warning "Could Not Find Registration" "We could not find the