Index: openacs-4/packages/lorsm/www/shared/course-info.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/shared/Attic/course-info.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/lorsm/www/shared/course-info.tcl	4 Sep 2004 14:51:29 -0000	1.1
+++ openacs-4/packages/lorsm/www/shared/course-info.tcl	27 Oct 2004 07:46:54 -0000	1.2
@@ -17,16 +17,21 @@
 
 
 set context [list [list [export_vars -base .] "Shared Courses"] "Preview Course"]
+set community_id [dotlrn_community::get_community_id]
+
 set title "Preview Course"
 
+# Permissions
+dotlrn::require_user_admin_community -user_id [ad_conn user_id] -community_id $community_id
+
 # In order to share courses across classes, we need to share
 # file-storage objects across file-storage instances. This has been
 # proven to be really tricky. But here we pass the fs_package_id for
 # the current community, so we don't have to have permissions for
 # other instances of file-storages of other classes.  See
 # documentation for further details.
 
-set community_id [dotlrn_community::get_community_id]
+
 set fs_local_package_id [site_node_apm_integration::get_child_package_id \
 		       -package_id [dotlrn_community::get_package_id $community_id] \
 		       -package_key "file-storage"\