Index: openacs-4/packages/simulation/www/siminst/simulation-casting-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/siminst/Attic/simulation-casting-2.tcl,v diff -u -r1.7 -r1.8 --- openacs-4/packages/simulation/www/siminst/simulation-casting-2.tcl 16 Dec 2003 16:00:34 -0000 1.7 +++ openacs-4/packages/simulation/www/siminst/simulation-casting-2.tcl 17 Dec 2003 10:43:07 -0000 1.8 @@ -64,8 +64,14 @@ {options $eligible_groups} {help_text {Use Group Administration to add groups}} } +} -new_request { + + #TODO: is this the right way to set defaults in ad_form? + set enroll_type "closed" + set casting_type "auto" + } -on_request { - + set enroll_groups [simulation::template::get_parties -workflow_id $workflow_id -rel_type auto-enroll] } -on_submit {