Index: openacs-4/packages/simulation/www/simplay/messages.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/simplay/messages.tcl,v diff -u -N -r1.7 -r1.8 --- openacs-4/packages/simulation/www/simplay/messages.tcl 12 Jan 2004 13:43:14 -0000 1.7 +++ openacs-4/packages/simulation/www/simplay/messages.tcl 19 Jan 2004 13:37:32 -0000 1.8 @@ -5,6 +5,8 @@ role_id:integer } +#PERM: user should be a participant in sim + set workflow_id [simulation::case::get_element -case_id $case_id -element workflow_id] set simulation_name [simulation::template::get_element -workflow_id $workflow_id -element pretty_name]