Index: openacs-4/packages/workflow/tcl/install-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/tcl/install-procs.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/workflow/tcl/install-procs.tcl	28 Aug 2003 09:41:59 -0000	1.6
+++ openacs-4/packages/workflow/tcl/install-procs.tcl	18 Nov 2003 17:57:57 -0000	1.7
@@ -46,7 +46,27 @@
     }
 }
 
+ad_proc -private workflow::install::after_upgrade {
+    {-from_version_name:required}
+    {-to_version_name:required}
+} {
+    Workflow package after upgrade callback proc
+} {
+    apm_upgrade_logic \
+        -from_version_name $from_version_name \
+        -to_version_name $to_version_name \
+        -spec {
+            1.2 2.0d1 {
+                set workflow_ids [db_list select_workflow_ids { select workflow_id from workflows }]
+                foreach workflow_id $workflow_ids {
+                    workflow::definition_changed_handler \
+                        -workflow_id $workflow_id
+                }
+            }
+        }
+}
 
+
 #####
 #
 # Create service contracts