Index: library/nx/nx.tcl
===================================================================
diff -u -rfe1a8f6956a13ac6ce9f2df858b0c4d736840089 -r3e0565bde9f6f02b2145aecc8c1756c28d8ae507
--- library/nx/nx.tcl	(.../nx.tcl)	(revision fe1a8f6956a13ac6ce9f2df858b0c4d736840089)
+++ library/nx/nx.tcl	(.../nx.tcl)	(revision 3e0565bde9f6f02b2145aecc8c1756c28d8ae507)
@@ -246,7 +246,7 @@
       if {![info exists ::nsf::methodDefiningMethod([lindex $args 0])]} {
 	error "'[lindex $args 0]' is not a method defining method"
       }
-      set r [{*}:$args]
+      set r [::nsf::my -system {*}$args]
       if {$r ne ""} {::nsf::method::property [self] $r call-protected false}
       return $r
     }
@@ -256,7 +256,7 @@
       if {![info exists ::nsf::methodDefiningMethod([lindex $args 0])]} {
 	error "'[lindex $args 0]' is not a method defining method"
       }
-      set r [{*}:$args]
+      set r [::nsf::my -system {*}$args]
       if {$r ne ""} {::nsf::method::property [self] $r call-protected true}
       return $r
     }
@@ -266,7 +266,8 @@
       if {![info exists ::nsf::methodDefiningMethod([lindex $args 0])]} {
 	error "'[lindex $args 0]' is not a method defining method"
       }
-      set r [{*}:$args]
+      set r [::nsf::my -system {*}$args]
+
       if {$r ne ""} {::nsf::method::property [self] $r call-private true}
       return $r
     }