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.6 -r1.7
--- openacs-4/packages/simulation/www/simplay/control-bar.tcl	19 Dec 2003 14:35:16 -0000	1.6
+++ openacs-4/packages/simulation/www/simplay/control-bar.tcl	19 Dec 2003 14:52:21 -0000	1.7
@@ -24,7 +24,7 @@
        and wcrmp.role_id = sm.to_role_id
        and wcrmp.case_id = sm.case_id
 "]
-set messages_url ${section_uri}messages
+set messages_url [export_vars -base ${section_uri}messages { case_id }]
 
 
 # TODO: decide whether to replace direct sql with this API loop: