Index: openacs-4/packages/dotlrn/www/admin/class-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/class-edit.tcl,v
diff -u -r1.8 -r1.8.6.1
--- openacs-4/packages/dotlrn/www/admin/class-edit.tcl	29 May 2003 18:05:01 -0000	1.8
+++ openacs-4/packages/dotlrn/www/admin/class-edit.tcl	25 Aug 2004 15:50:58 -0000	1.8.6.1
@@ -28,6 +28,9 @@
     context_bar:onevalue
 }
 
+#Pages in this directory are only runnable by dotlrn-wide admins.
+dotlrn::require_admin 
+
 if {![db_0or1row select_class_info {}]} {
     ad_return_complaint 1 "<li>[_ dotlrn.Invalid] class_key $class_key</li>"
     ad_script_abort