Index: openacs-4/packages/acs-admin/lib/service-parameters.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/lib/service-parameters.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/acs-admin/lib/service-parameters.tcl 11 Dec 2003 21:39:45 -0000 1.4 +++ openacs-4/packages/acs-admin/lib/service-parameters.tcl 23 Jan 2004 14:29:25 -0000 1.5 @@ -3,6 +3,13 @@ # +if { ![acs_user::site_wide_admin_p] } { + ad_return_forbidden \ + "Permission Denied" \ + "
You don't have permission to view this page.
" + ad_script_abort +} + set user_id [ad_conn user_id] set swadmin_p 0 db_multirow -extend { url admin_url param_url } packages services_select {} {