Index: openacs-4/packages/xotcl-core/tcl/doc-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/doc-procs.tcl,v
diff -u -r1.6.2.2 -r1.6.2.3
--- openacs-4/packages/xotcl-core/tcl/doc-procs.tcl	5 Apr 2019 12:11:40 -0000	1.6.2.2
+++ openacs-4/packages/xotcl-core/tcl/doc-procs.tcl	8 May 2019 14:23:40 -0000	1.6.2.3
@@ -28,7 +28,7 @@
         foreach methodName [xo::getObjectProperty $e $kind] {
             if {$documented_methods} {
                 set proc_index [::xo::api proc_index $scope $e $kind $methodName]
-                #my msg "check $methodName => [nsv_exists api_proc_doc $proc_index]"
+                #:msg "check $methodName => [nsv_exists api_proc_doc $proc_index]"
                 if {[nsv_exists api_proc_doc $proc_index]} {
                     lappend methods $prefix$methodName
                 }