Index: openacs-4/packages/dotlrn/www/admin/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/index.tcl,v diff -u -r1.15.6.1 -r1.15.6.2 --- openacs-4/packages/dotlrn/www/admin/index.tcl 19 Jul 2004 18:39:39 -0000 1.15.6.1 +++ openacs-4/packages/dotlrn/www/admin/index.tcl 25 Aug 2004 15:50:58 -0000 1.15.6.2 @@ -21,6 +21,9 @@ @creation-date 2001-11-04 } +#Pages in this directory are only runnable by dotlrn-wide admins. +dotlrn::require_admin + set oacs_site_wide_admin_p [acs_user::site_wide_admin_p] set admin_pretty_name [parameter::get -localize -parameter dotlrn_admin_pretty_name]