Index: library/nx/nx.tcl
===================================================================
diff -u -rcc9032518f095207cd1832ae5b4202e0ace96c71 -r7257200f41c3bd0d0309db6932e5788d860fa119
--- library/nx/nx.tcl	(.../nx.tcl)	(revision cc9032518f095207cd1832ae5b4202e0ace96c71)
+++ library/nx/nx.tcl	(.../nx.tcl)	(revision 7257200f41c3bd0d0309db6932e5788d860fa119)
@@ -219,7 +219,7 @@
 
     # method-modifier for object specific methos
     :method class {what args} {
-      if {$what in [list "alias" "attribute" "forward" "method"]} {
+      if {$what in [list "alias" "attribute" "forward" "method" "variable"]} {
         return [::nsf::object::dispatch [::nsf::self] ::nsf::classes::nx::Object::$what {*}$args]
       }
       if {$what in [list "info"]} {
@@ -1673,13 +1673,13 @@
   }
 
   nx::Class method variable {
-			     {-class ""} 
-			     {-initblock ""} 
-			     {-objectparameter false}
-			     {-accessor false}
-			     spec 
-			     default:optional
-			   } {
+     {-class ""} 
+     {-initblock ""} 
+     {-objectparameter false}
+     {-accessor false}
+     spec 
+     default:optional
+   } {
     #puts stderr "Class variable $spec"
     set slot [::nx::MetaSlot createFromParameterSpec [::nsf::self] \
 		  -class $class \