Index: openacs-4/packages/dotlrn/www/admin/users-chunk-small.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/users-chunk-small.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/dotlrn/www/admin/users-chunk-small.tcl	20 Feb 2002 20:36:41 -0000	1.4
+++ openacs-4/packages/dotlrn/www/admin/users-chunk-small.tcl	6 Mar 2002 00:08:02 -0000	1.5
@@ -17,11 +17,13 @@
 }
 
 if {![exists_and_not_null referer]} {
-    set referer users
+    set referer "/dotlrn/admin/users"
 }
 
 # Currently, just present a list of dotLRN users
-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 {}