Index: openacs-4/packages/xowiki/tcl/package-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/package-procs.tcl,v diff -u -N -r1.291.2.29 -r1.291.2.30 --- openacs-4/packages/xowiki/tcl/package-procs.tcl 11 Feb 2017 11:42:11 -0000 1.291.2.29 +++ openacs-4/packages/xowiki/tcl/package-procs.tcl 6 Mar 2017 00:04:29 -0000 1.291.2.30 @@ -878,11 +878,14 @@ } } } + + #ns_log notice "call procsearch www-$method on: [$page_or_package info precedence]" if {[$page_or_package procsearch www-$method] eq ""} { return [my error_msg "Method '[ns_quotehtml $method]' is not defined for this object"] } else { - #my msg "--invoke [my set object] id=$page_or_package method=$method ([my id] batch_mode $batch_mode)" + #my log "--invoke [my set object] id=$page_or_package method=$method ([my id] batch_mode $batch_mode)" + if {$batch_mode} {[my id] set __batch_mode 1} set err [catch { set r [my call $page_or_package $method ""]} errorMsg] if {$err} {set errorCode $::errorCode}