Index: openacs-4/contrib/packages/simulation/www/siminst/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/www/siminst/Attic/index.tcl,v diff -u -r1.27 -r1.28 --- openacs-4/contrib/packages/simulation/www/siminst/index.tcl 7 Jan 2004 14:46:04 -0000 1.27 +++ openacs-4/contrib/packages/simulation/www/siminst/index.tcl 8 Jan 2004 11:28:07 -0000 1.28 @@ -5,6 +5,7 @@ set page_title "SimInst" set context [list $page_title] set package_id [ad_conn package_id] +set user_id [ad_conn user_id] permission::require_permission -object_id $package_id -privilege sim_inst set admin_p [permission::permission_p -object_id $package_id -privilege admin]