Index: openacs-4/packages/xowf/tcl/xowf-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/tcl/xowf-procs.tcl,v diff -u -N -r1.28.2.36 -r1.28.2.37 --- openacs-4/packages/xowf/tcl/xowf-procs.tcl 29 Jul 2020 11:53:26 -0000 1.28.2.36 +++ openacs-4/packages/xowf/tcl/xowf-procs.tcl 13 Aug 2020 14:38:59 -0000 1.28.2.37 @@ -580,7 +580,7 @@ Class create Property -superclass ::xowf::Property -set abstract 1 [:default_definition] $workflow_definition"} errorMsg]} { - ns_log error "Error in workflow definition: $errorMsg\n$::errorInfo\n\ + ns_log error "Error in workflow definition ([${:object} name]): $errorMsg\n$::errorInfo\n\ ===== default_definition: [:default_definition] \n\ ===== workflow_definition: $workflow_definition" :msg -html t "Error in workflow definition: [ns_quotehtml $errorMsg]" @@ -617,7 +617,7 @@ # multiple workflow instances are created for a single workflow # definition in a request. # - #:log START-CREATES + #:log START-CREATES-sharedWorkflowDefinition=$::xowf::sharedWorkflowDefinition if {$::xowf::sharedWorkflowDefinition} { if {[${:object} is_wf]} { set source_obj ${:object}