Index: openacs-4/packages/simulation/www/simplay/case-admin.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/simplay/case-admin.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/simulation/www/simplay/case-admin.tcl 12 Jan 2004 13:43:14 -0000 1.2 +++ openacs-4/packages/simulation/www/simplay/case-admin.tcl 12 Jan 2004 15:14:36 -0000 1.3 @@ -2,11 +2,10 @@ This page allows users to choose which group to join. It is only relevant for simulations with casting type of group. } { case_id:integer - role_id:integer } set title "Administer" -set context [list [list . "SimPlay"] [list [export_vars -base case { case_id role_id }] "Case CASENAME"] $title] +set context [list [list . "SimPlay"] $title] set user_id [ad_conn user_id] set package_id [ad_conn package_id] set section_uri [apm_package_url_from_id $package_id]simplay/