Index: openacs-4/packages/dotlrn/www/admin/users-chunk-large.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/users-chunk-large.tcl,v diff -u -r1.5 -r1.6 --- openacs-4/packages/dotlrn/www/admin/users-chunk-large.tcl 20 Feb 2002 20:36:41 -0000 1.5 +++ openacs-4/packages/dotlrn/www/admin/users-chunk-large.tcl 6 Mar 2002 00:08:02 -0000 1.6 @@ -14,7 +14,7 @@ } if {![exists_and_not_null referer]} { - set referer "users" + set referer "/dotlrn/admin/users" } set user_id [ad_conn user_id] @@ -46,7 +46,9 @@ set dotlrn_package_id [dotlrn::get_package_id] set root_object_id [acs_magic_object "security_context_root"] - if {[string equal $type "pending"] == 1} { + if {[string equal $type "deactivated"] == 1} { + db_multirow users select_deactivated_users {} + } elseif {[string equal $type "pending"] == 1} { db_multirow users select_non_dotlrn_users {} } else { db_multirow users select_dotlrn_users {}