Index: library/nx/nx.tcl
===================================================================
diff -u -r2d9fcf7f4dc9ccd8ac52702850f60724a04bcba4 -rd79efb10b92ad2045196990af50bc042e60b88f4
--- library/nx/nx.tcl	(.../nx.tcl)	(revision 2d9fcf7f4dc9ccd8ac52702850f60724a04bcba4)
+++ library/nx/nx.tcl	(.../nx.tcl)	(revision d79efb10b92ad2045196990af50bc042e60b88f4)
@@ -531,7 +531,6 @@
 	# ... and remove it if found
 	if {$p > -1} {set arguments [lreplace $arguments $p $p+1]}
       }
-      puts "::nsf::method::forward $(object) -per-object $(methodName) {*}$arguments"
       set r [::nsf::method::forward $(object) -per-object $(methodName) {*}$arguments]
       ::nsf::method::property $(object) -per-object $r call-protected \
 	  [::nsf::dispatch $(object) __default_method_call_protection]
@@ -831,7 +830,7 @@
   ######################################################################
 
   proc ::nx::internal::infoOptions {obj} {
-    #puts stderr "INFO INFO $obj -> '[::nsf::directdispatch $obj ::nsf::methods::object::info::methods -methodtype all]'"
+    #puts stderr "INFO INFO $obj -> '[::nsf::directdispatch $obj ::nsf::methods::object::info::methods -type all]'"
     set methods [list]
     foreach name [::nsf::directdispatch $obj ::nsf::methods::object::info::methods] {
       if {$name eq "unknown"} continue