Index: openacs-4/packages/dotlrn/www/admin/department-new.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/department-new.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/dotlrn/www/admin/department-new.tcl	23 Oct 2002 12:38:40 -0000	1.8
+++ openacs-4/packages/dotlrn/www/admin/department-new.tcl	13 Jan 2005 13:57:21 -0000	1.9
@@ -27,6 +27,9 @@
     context_bar:onevalue
 }
 
+#Pages in this directory are only runnable by dotlrn-wide admins.
+dotlrn::require_admin 
+
 set title "[_ dotlrn.New] [parameter::get -localize -parameter departments_pretty_name]"
 set context_bar [list [list departments [parameter::get -localize -parameter departments_pretty_plural]] [_ dotlrn.New]]