Index: openacs-4/contrib/packages/simulation/www/siminst/map-tasks.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/www/siminst/Attic/map-tasks.tcl,v
diff -u -r1.13.2.1 -r1.13.2.2
--- openacs-4/contrib/packages/simulation/www/siminst/map-tasks.tcl	16 Mar 2004 16:16:19 -0000	1.13.2.1
+++ openacs-4/contrib/packages/simulation/www/siminst/map-tasks.tcl	1 Jun 2004 13:35:25 -0000	1.13.2.2
@@ -51,12 +51,13 @@
     if { ![empty_string_p $row(assigned_role_pretty)] || ![empty_string_p $recipient_role_pretty] } {
         append section_name " ("
         if { ![empty_string_p $row(assigned_role_pretty)] } {
-            append section_name "$row(assigned_role_pretty))"
+            append section_name "$row(assigned_role_pretty)"
         }
         if { ![empty_string_p $recipient_role_pretty] } {
-            append section_name "-> $recipient_role_pretty)"
+            append section_name " to $recipient_role_pretty"
         }
     }
+    append section_name ")"
     
     ad_form -extend -name tasks -form \
         [list [list description_$row(action_id):richtext,optional \
Index: openacs-4/packages/simulation/www/siminst/map-tasks.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/siminst/map-tasks.tcl,v
diff -u -r1.13.2.1 -r1.13.2.2
--- openacs-4/packages/simulation/www/siminst/map-tasks.tcl	16 Mar 2004 16:16:19 -0000	1.13.2.1
+++ openacs-4/packages/simulation/www/siminst/map-tasks.tcl	1 Jun 2004 13:35:25 -0000	1.13.2.2
@@ -51,12 +51,13 @@
     if { ![empty_string_p $row(assigned_role_pretty)] || ![empty_string_p $recipient_role_pretty] } {
         append section_name " ("
         if { ![empty_string_p $row(assigned_role_pretty)] } {
-            append section_name "$row(assigned_role_pretty))"
+            append section_name "$row(assigned_role_pretty)"
         }
         if { ![empty_string_p $recipient_role_pretty] } {
-            append section_name "-> $recipient_role_pretty)"
+            append section_name " to $recipient_role_pretty"
         }
     }
+    append section_name ")"
     
     ad_form -extend -name tasks -form \
         [list [list description_$row(action_id):richtext,optional \