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.14 -r1.15
--- openacs-4/contrib/packages/simulation/www/simplay/message.tcl	7 Jan 2004 16:00:37 -0000	1.14
+++ openacs-4/contrib/packages/simulation/www/simplay/message.tcl	8 Jan 2004 15:54:01 -0000	1.15
@@ -20,6 +20,7 @@
 foreach role_id [workflow::case::get_user_roles -case_id $case_id] {
     lappend from_role_options [list [workflow::role::get_element -role_id $role_id -element pretty_name] $role_id]
 }
+
 # First sender role selected by default
 if { ![exists_and_not_null sender_role_id] } {
     set sender_role_id [lindex [lindex $from_role_options 0] 1]