New serialise...State accessor

This will be required to fix a possible race condition in causality_workflow

product/ERP5Type/Accessor/WorkflowState.py

@@ -26,6 +26,7 @@
 #
 ##############################################################################
 
+from Acquisition import aq_base
 from Products.ERP5Type.PsycoWrapper import psyco
 from Base import Getter as BaseGetter, Setter as BaseSetter
 from warnings import warn
@@ -120,3 +121,16 @@ class TranslatedTitleGetter(TitleGetter):
       return result.encode('utf8')
 
     psyco.bind(__call__)
+
+def SerializeGetter(id, key):
+  def serialize(self):
+    """Prevent concurrent transaction from changing of state of this object
+    """
+    try:
+      self = aq_base(self).workflow_history
+      self = self[key]
+    except (AttributeError, KeyError):
+      pass
+    self._p_changed = 1
+  serialize.__name__ = id
+  return serialize

product/ERP5Type/Base.py

@@ -518,7 +518,9 @@ def initializePortalTypeDynamicWorkflowMethods(ptype_klass, portal_workflow):
           ('getTranslated%s' % UpperCase(state_var),
                                      WorkflowState.TranslatedGetter),
           ('getTranslated%sTitle' % UpperCase(state_var),
-                                     WorkflowState.TranslatedTitleGetter)):
+                                     WorkflowState.TranslatedTitleGetter),
+          ('serialize%s' % UpperCase(state_var), WorkflowState.SerializeGetter),
+          ):
         if not hasattr(ptype_klass, method_id):
           method = getter(method_id, wf_id)
           # Attach to portal_type