Index: library/nx/nx.tcl
===================================================================
diff -u -r1d351e2644038c65f9b5568de5da3fcdf3f1ae3f -rdb2dcddd4328ce68ddf06905ffccda392fb1aa0f
--- library/nx/nx.tcl	(.../nx.tcl)	(revision 1d351e2644038c65f9b5568de5da3fcdf3f1ae3f)
+++ library/nx/nx.tcl	(.../nx.tcl)	(revision db2dcddd4328ce68ddf06905ffccda392fb1aa0f)
@@ -1293,13 +1293,15 @@
       # TODO: the following is not pretty; however, contains might
       # build xotcl and next objects.
       if {[::nsf::is class ::xotcl::Class]} {::xotcl::Class instmixin add $m end}
-      ::nsf::dispatch [self] -frame method ::apply [list {} $cmds $object]
       #namespace eval $object $cmds
+      #::nsf::dispatch [self] -frame method ::apply [list {} $cmds $object]
+      ::apply [list {} $cmds $object]
       Class mixin delete $m
       if {[::nsf::is class ::xotcl::Class]} {::xotcl::Class instmixin delete $m}
     } else {
-      ::nsf::dispatch [self] -frame method ::apply [list {} $cmds $object]
       #namespace eval $object $cmds
+      #::nsf::dispatch [self] -frame method ::apply [list {} $cmds $object]
+      ::apply [list {} $cmds $object]
     }
   }