Index: openacs-4/packages/simulation/www/siminst/simulation-casting-3.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/siminst/simulation-casting-3.tcl,v
diff -u -N -r1.13 -r1.14
--- openacs-4/packages/simulation/www/siminst/simulation-casting-3.tcl	7 Jan 2004 14:46:04 -0000	1.13
+++ openacs-4/packages/simulation/www/siminst/simulation-casting-3.tcl	7 Jan 2004 15:54:55 -0000	1.14
@@ -21,15 +21,19 @@
 
 
 set eligible_groups [simulation::casting_groups -mapped_only -workflow_id $workflow_id]
+set num_groups [llength $eligible_groups]
 
 foreach role_id [workflow::get_roles -workflow_id $workflow_id] {
     set role_${role_id}_pretty_name [workflow::role::get_element -role_id $role_id -element pretty_name]
 
-    lappend form [list parties_${role_id}:text(checkbox),multiple,optional \
-                      [list label \$role_${role_id}_pretty_name] \
-                      {options $eligible_groups} \
-                      {section "Roles"}
-                     ]
+    if { $num_groups > 0 } {
+        lappend form [list parties_${role_id}:text(checkbox),multiple,optional \
+                          [list label \$role_${role_id}_pretty_name] \
+                          {options $eligible_groups} \
+                          {section "Roles"} \
+                         ]
+    }
+
     lappend form [list \
                       users_per_case_${role_id}:integer \
                       {label "Number of users per role"} \