Index: library/nx/nx.tcl
===================================================================
diff -u -r496dfc7bd5088b8a90f1fe532cd22336c151b06d -r84af56591a1cc4ac7a3779ec44f6978203ef016a
--- library/nx/nx.tcl	(.../nx.tcl)	(revision 496dfc7bd5088b8a90f1fe532cd22336c151b06d)
+++ library/nx/nx.tcl	(.../nx.tcl)	(revision 84af56591a1cc4ac7a3779ec44f6978203ef016a)
@@ -409,16 +409,17 @@
 
   # register method "info" on Object and Class
   Object forward info -onerror ::nsf::infoError ::nx::objectInfo %1 {%@2 %self}
-  #Class forward  info -onerror ::nsf::infoError ::nx::classInfo %1 {%@2 %self}
-  Class method info args {
-    # In case Class.info is applied on an object (via mixins), do "next"
-    if {![::nsf::objectproperty [::nsf::current object] class]} next else {
-      if {[catch {::nx::classInfo [lindex $args 0] [::nsf::current object] {*}[lrange $args 1 end]} result]} {
-	::nsf::infoError $result
-      }
-      return $result
-    }
-  }
+  Class forward  info -onerror ::nsf::infoError ::nx::classInfo %1 {%@2 %self}
+  ::nsf::methodproperty nx::Class info class-only true
+  #Class method info args {
+  #  # In case Class.info is applied on an object (via mixins), do "next"
+  #  if {![::nsf::objectproperty [::nsf::current object] class]} next else {
+  #    if {[catch {::nx::classInfo [lindex $args 0] [::nsf::current object] {*}[lrange $args 1 end]} result]} {
+#	::nsf::infoError $result
+#      }
+#      return $result
+#    }
+#  }
 
   Class method filterguard {filter guard} {
     # In case Class.filterguard is applied on an object (via mixins), do "next"