Index: openacs-4/packages/simulation/www/simplay/message.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/simplay/message.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/simulation/www/simplay/message.tcl 19 Dec 2003 14:53:07 -0000 1.3 +++ openacs-4/packages/simulation/www/simplay/message.tcl 5 Jan 2004 12:33:41 -0000 1.4 @@ -1,5 +1,8 @@ ad_page_contract { Create or edit a message. +} { + case_id:optional + recipient_id:optional } # TODO: task recipient_id as an optional input parameter @@ -8,5 +11,3 @@ set context [list [list "." "SimPlay"] [list $page_title] ] set package_id [ad_conn package_id] - -# TODO: Pass case_id to master template so the control-bar is right