Index: openacs-4/packages/dotlrn/www/admin/users-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/users-delete.tcl,v diff -u -r1.6 -r1.7 --- openacs-4/packages/dotlrn/www/admin/users-delete.tcl 4 Dec 2002 09:51:04 -0000 1.6 +++ openacs-4/packages/dotlrn/www/admin/users-delete.tcl 13 Jan 2005 13:57:22 -0000 1.7 @@ -29,6 +29,9 @@ context_bar:onevalue } +#Pages in this directory are only runnable by dotlrn-wide admins. +dotlrn::require_admin + set context_bar [list [list users [_ dotlrn.Users]] [list users-search [_ dotlrn.User_Search]] [_ dotlrn.Nuke_Users]] form create confirm_delete