Index: openacs-4/packages/simulation/www/simplay/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/simplay/index.tcl,v
diff -u -r1.11 -r1.12
--- openacs-4/packages/simulation/www/simplay/index.tcl	20 Apr 2004 21:12:26 -0000	1.11
+++ openacs-4/packages/simulation/www/simplay/index.tcl	30 Nov 2004 21:09:17 -0000	1.12
@@ -2,14 +2,22 @@
     Simplay index page.
 } {
     {case_id:integer ""}
+    case_admin_order:optional
 }
 
+if { ![exists_and_not_null case_admin_order] } {
+    set case_admin_order 0
+}
+
 set title [_ simulation.SimPlay]
 set context [list $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/
+set package_uri [apm_package_url_from_id $package_id]
+set section_uri ${package_uri}simplay/
 
+set help_url "${package_uri}object/[parameter::get -package_id $package_id -parameter SimPlayHelpFile]"
+
 set adminplayer_p [permission::permission_p -object_id $package_id -privilege sim_adminplayer]
 
 set case_list [db_list_of_lists case_count {