Index: openacs-4/packages/workflow/tcl/workflow-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/tcl/workflow-procs.tcl,v
diff -u -r1.18 -r1.19
--- openacs-4/packages/workflow/tcl/workflow-procs.tcl	17 Dec 2003 19:14:02 -0000	1.18
+++ openacs-4/packages/workflow/tcl/workflow-procs.tcl	9 Jan 2004 15:47:53 -0000	1.19
@@ -445,6 +445,8 @@
     Should be called when the workflow definition has changed while there are active cases.
     Will update the record of enabled actions in each of the case, so they reflect the new workflow.
 } {
+    workflow::flush_cache -workflow_id $workflow_id
+
     set case_ids [db_list select_cases { select case_id from workflow_cases where workflow_id = :workflow_id }]
 
     foreach case_id $case_ids {