Index: openacs-4/packages/simulation/www/simplay/control-bar.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/simplay/control-bar.tcl,v diff -u -N -r1.19 -r1.19.2.1 --- openacs-4/packages/simulation/www/simplay/control-bar.tcl 30 Nov 2004 21:30:41 -0000 1.19 +++ openacs-4/packages/simulation/www/simplay/control-bar.tcl 31 Oct 2006 10:13:04 -0000 1.19.2.1 @@ -114,6 +114,8 @@ set help_url [export_vars -base "${section_uri}object/[parameter::get -parameter SimPlayHelpFile]" { case_id role_id }] +set history_url [export_vars -base "${section_uri}object/[parameter::get -parameter SieberdamHistoryFile]" { case_id role_id }] + set curr_state [_ simulation.curr_state] db_1row get_state {