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.11 -r1.12 --- openacs-4/packages/xowf/tcl/xowf-procs.tcl 31 Aug 2017 08:42:12 -0000 1.11 +++ openacs-4/packages/xowf/tcl/xowf-procs.tcl 6 Sep 2017 18:15:03 -0000 1.12 @@ -95,6 +95,9 @@ #:log "$obj [nsf::is object $obj] precedence: [$obj info precedence]" return $obj } + if {[$obj hasclass ::xowf::WorkflowPage]} { + return [$obj wf_context] + } } } #