Index: openacs-4/packages/dotlrn/www/applets-chunk.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/applets-chunk.tcl,v
diff -u -N -r1.5 -r1.6
--- openacs-4/packages/dotlrn/www/applets-chunk.tcl	29 Mar 2002 19:14:46 -0000	1.5
+++ openacs-4/packages/dotlrn/www/applets-chunk.tcl	12 Jul 2002 21:34:17 -0000	1.6
@@ -24,10 +24,11 @@
 } -query {
 }
 
-set community_id [dotlrn_community::get_community_id]
+# this chunk must be restricted to admins of the community only
+dotlrn::require_user_admin_community \
+    -user_id [ad_conn user_id] \
+    -community_id [dotlrn_community::get_community_id]
 
-set user_id [ad_conn user_id]
-
 # Get active applets
 set list_of_active_applets [dotlrn_community::list_active_applets -community_id $community_id]