Index: apps/utils/nxdoc
===================================================================
diff -u -r02348ab7dbfe333906bfb0bd63a5d431692dc602 -r263cd750f41d98badaae2b2d06bb2ea58feb99e4
--- apps/utils/nxdoc	(.../nxdoc)	(revision 02348ab7dbfe333906bfb0bd63a5d431692dc602)
+++ apps/utils/nxdoc	(.../nxdoc)	(revision 263cd750f41d98badaae2b2d06bb2ea58feb99e4)
@@ -96,8 +96,8 @@
       interp delete $i
     }
 
-    :protected class method objectparameter {} {
-      set slots [:info slot objects]
+    :protected method __objectparameter {} {
+      set slots [[current class] info slots]
       foreach slot $slots {
 	lappend defs([$slot position]) [$slot getParameterSpec]
       }