Index: openacs-4/packages/simulation/tcl/sim-role-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/tcl/sim-role-procs.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/simulation/tcl/sim-role-procs.tcl	23 Jan 2004 14:31:36 -0000	1.7
+++ openacs-4/packages/simulation/tcl/sim-role-procs.tcl	26 Jan 2004 12:34:47 -0000	1.8
@@ -211,7 +211,9 @@
 }
 
 ad_proc -private simulation::role::get_ids {
+    {-all:boolean}
     {-workflow_id:required}
+    {-parent_action_id {}}
 } {
     Get the IDs of all the roles in the right order.
 
@@ -221,7 +223,7 @@
 
     @author Lars Pind (lars@collaboraid.biz)
 } {
-    return [workflow::role::get_ids -workflow_id $workflow_id]
+    return [workflow::role::get_ids -all=$all_p -workflow_id $workflow_id -parent_action_id $parent_action_id]
 }
 
 ad_proc -private simulation::role::generate_spec {