Index: openacs-4/contrib/packages/simulation/www/siminst/simulation-casting-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/www/siminst/Attic/simulation-casting-2.tcl,v
diff -u -r1.9 -r1.10
--- openacs-4/contrib/packages/simulation/www/siminst/simulation-casting-2.tcl	17 Dec 2003 16:51:24 -0000	1.9
+++ openacs-4/contrib/packages/simulation/www/siminst/simulation-casting-2.tcl	18 Dec 2003 08:31:03 -0000	1.10
@@ -21,7 +21,7 @@
 set in_three_months_date [clock format [expr [clock seconds] + 3*3600*24*31] -format "%Y %m %d"]
 set in_four_months_date [clock format [expr [clock seconds] + 4*3600*24*31] -format "%Y %m %d"]
 
-set eligible_groups [simulation::groups_eligible_for_casting]
+set eligible_groups [simulation::casting_groups -workflow_id $workflow_id]
 
 ad_form -export { workflow_id } -name simulation -form {
     {enroll_start:date,optional