Index: openacs-4/contrib/obsolete-packages/acs-workflow/tcl/workflow-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/acs-workflow/tcl/workflow-procs.tcl,v diff -u -r1.8 -r1.9 --- openacs-4/contrib/obsolete-packages/acs-workflow/tcl/workflow-procs.tcl 10 Jan 2002 01:56:39 -0000 1.8 +++ openacs-4/contrib/obsolete-packages/acs-workflow/tcl/workflow-procs.tcl 12 Jan 2002 00:03:26 -0000 1.9 @@ -301,25 +301,26 @@ ad_proc -public wf_task_panels { -task_id:required -action:boolean + -target {-user_id 0} } { - Get the panels for a task in [array get] format. Action + Add the panels for a task into the multirow target. Action panels follow non-action panels. These could be returned by wf_task_info in the future with a little rewriting of the workflow pages. @param task_id The task in question @param action Only return action panels + @param target The multirow target @param user_id Return "show only when task started" panels for this user @author Don Baccus (dhogaza@pacifier.com) } { if { $action_p } { - db_multirow panels action_panels "" + db_multirow $target action_panels "" } else { - db_multirow panels all_panels "" + db_multirow $target all_panels "" } - return [array get panels] } ad_proc -public wf_journal {