Index: openacs-4/contrib/packages/simulation/www/simplay/message.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/www/simplay/Attic/message.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/contrib/packages/simulation/www/simplay/message.tcl	5 Jan 2004 15:29:51 -0000	1.5
+++ openacs-4/contrib/packages/simulation/www/simplay/message.tcl	5 Jan 2004 15:35:40 -0000	1.6
@@ -11,7 +11,7 @@
 }
 
 set page_title "Message"
-set context [list [list "." "SimPlay"] [list $page_title] ]
+set context [list [list "." "SimPlay"] [list [export_vars -base case { case_id }] "Case"] $page_title]
 set package_id [ad_conn package_id]
 
 set workflow_id [workflow::case::get_element -case_id $case_id -element workflow_id]