Index: openacs-4/packages/dotlrn/www/deregister.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/deregister.tcl,v diff -u -r1.9 -r1.10 --- openacs-4/packages/dotlrn/www/deregister.tcl 8 Aug 2006 21:26:24 -0000 1.9 +++ openacs-4/packages/dotlrn/www/deregister.tcl 1 Nov 2013 21:08:31 -0000 1.10 @@ -36,13 +36,13 @@ # wouldn't break. This does have the unfortunate consequence that the name # user_id is not intuative when it is a list of many user_ids. (teadams@alum.mit.edu) -ad_maybe_redirect_for_registration +auth::require_login -if {[empty_string_p $community_id]} { +if {$community_id eq ""} { set community_id [dotlrn_community::get_community_id] } -if {[empty_string_p $user_id]} { +if {$user_id eq ""} { set user_id [ad_conn user_id] } else { dotlrn::require_user_admin_community -community_id $community_id