Index: library/nx/nx.tcl
===================================================================
diff -u -r1398015d9294ce3adec8b1d5dc6e98f7c717b243 -rdfaca66a33107320eac62bde6ac8ea15abbcbe83
--- library/nx/nx.tcl	(.../nx.tcl)	(revision 1398015d9294ce3adec8b1d5dc6e98f7c717b243)
+++ library/nx/nx.tcl	(.../nx.tcl)	(revision dfaca66a33107320eac62bde6ac8ea15abbcbe83)
@@ -470,6 +470,9 @@
     #    in nsf when calling e.g. "unknown" (such that a subcmd
     #    "unknown" does not interfere with the method "unknown").
     #
+    :protected method init {} {
+      ::nsf::object::property [self] keepcallerself true
+    }
     :protected method unknown {callInfo args} {
       set path [lrange $callInfo 1 end-1]; # set path [current methodpath]
       set m [lindex $callInfo end]