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 -r1.19 -r1.20
--- 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 09:00:06 -0000	1.20
@@ -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 {
@@ -129,4 +131,4 @@
            wc.workflow_id = :workflow_id and
            wcf.case_id = :case_id and
            wcf.parent_enabled_action_id is NULL
-}
\ No newline at end of file
+}