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 -r1.7.2.11 -r1.7.2.12
--- openacs-4/packages/xotcl-core/tcl/03-doc-procs.tcl	25 Jan 2016 08:04:52 -0000	1.7.2.11
+++ openacs-4/packages/xotcl-core/tcl/03-doc-procs.tcl	28 Feb 2016 19:46:32 -0000	1.7.2.12
@@ -71,10 +71,17 @@
       } {
       return ""
     }
-
     switch [llength $proc_spec] {
       1 {lassign [list "" ::nx::Object nsfproc $proc_spec] scope obj methodType method
-        if {![string match ::* $method]} {set method ::$method}
+        if {![string match ::* $method]} {
+          set method ::$method
+        }
+        #
+        # In case $proc_spec is a cmd, it has to be a nsfproc
+        #
+        if {[nsf::cmd::info type $method] ne "nsfproc"} {
+          return ""
+        }
       }
       3 {lassign $proc_spec obj methodType method; set scope ""}
       4 {lassign $proc_spec scope obj methodType method}