Index: openacs-4/packages/simulation/www/simplay/case.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/simplay/case.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/simulation/www/simplay/case.tcl	18 Dec 2003 15:39:03 -0000	1.1
+++ openacs-4/packages/simulation/www/simplay/case.tcl	19 Dec 2003 14:00:39 -0000	1.2
@@ -4,7 +4,10 @@
     case_id:integer
 }
 
-set title "SimPlay"
+# TODO: Name of case
+# TODO: simulation::case::get - gets information about the case
+
+set title "Case"
 set context [list [list . "SimPlay"] $title]
 set user_id [ad_conn user_id]
 set package_id [ad_conn package_id]