Index: openacs-4/packages/file-storage/www/folder-add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/folder-add.tcl,v diff -u -r1.1.2.1 -r1.1.2.2 --- openacs-4/packages/file-storage/www/folder-add.tcl 28 Jul 2006 07:57:28 -0000 1.1.2.1 +++ openacs-4/packages/file-storage/www/folder-add.tcl 28 Jul 2006 08:09:37 -0000 1.1.2.2 @@ -24,6 +24,11 @@ } set user_id [ad_conn user_id] + +if {![acs_user::site_wide_admin_p]} { + ad_returnredirect "./?[export_url_vars folder_id]" +} + set package_id [ad_conn package_id] # check for write permission on the folder or item