Index: openacs-4/packages/xotcl-core/tcl/03-doc-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/03-doc-procs.tcl,v
diff -u -N -r1.19 -r1.20
--- openacs-4/packages/xotcl-core/tcl/03-doc-procs.tcl	17 Nov 2018 16:12:38 -0000	1.19
+++ openacs-4/packages/xotcl-core/tcl/03-doc-procs.tcl	17 Nov 2018 16:16:50 -0000	1.20
@@ -104,6 +104,10 @@
       ns_log warning "unexpected method type <$methodType>"
       set modifier ""
     }
+    set isObject [:scope_eval $scope ::nsf::is object $obj]
+    if {!$isObject} {
+      return ""
+    }
     set debug_p [:scope_eval $scope ::nsf::method::property $obj {*}$modifier $method debug]
 
     #