Index: library/nx/nx.tcl
===================================================================
diff -u -rb71082336b5d8539575db24d5b0ca620282d6bfd -r42ba8471f7620b850b6296f753cbc3079fe5c6cd
--- library/nx/nx.tcl	(.../nx.tcl)	(revision b71082336b5d8539575db24d5b0ca620282d6bfd)
+++ library/nx/nx.tcl	(.../nx.tcl)	(revision 42ba8471f7620b850b6296f753cbc3079fe5c6cd)
@@ -334,11 +334,11 @@
   #
 
   Class public method forward {
-     method
+     methodName
      -default -methodprefix -objframe:switch -onerror -returns -verbose:switch
      target:optional args
    } {
-    array set "" [:__resolve_method_path $method]
+    array set "" [:__resolve_method_path $methodName]
     set arguments [lrange [::nsf::current args] 1 end]
     if {[info exists returns]} {
       # search for "-returns" in the arguments before $args ...
@@ -526,11 +526,11 @@
     }
 
     :public method "object forward" {
-      method
+      methodName
       -default -methodprefix -objframe:switch -onerror -returns -verbose:switch
       target:optional args
     } {
-      array set "" [:__resolve_method_path -per-object $method]
+      array set "" [:__resolve_method_path -per-object $methodName]
       set arguments [lrange [::nsf::current args] 1 end]
       if {[info exists returns]} {
 	# search for "-returns" in the arguments before $args ...