Index: library/nx/nx.tcl
===================================================================
diff -u -r77104533a2105611e79a6723ece344e0ae6dc016 -rfdab3b9e05d21cb92835b9128193c7ba329d583d
--- library/nx/nx.tcl	(.../nx.tcl)	(revision 77104533a2105611e79a6723ece344e0ae6dc016)
+++ library/nx/nx.tcl	(.../nx.tcl)	(revision fdab3b9e05d21cb92835b9128193c7ba329d583d)
@@ -411,7 +411,7 @@
     :protected method unknown {obj m args} {
       set path [current methodpath]
       #puts stderr "+++ UNKNOWN obj $obj '$m' $args // path '[current methodpath]'"
-      if {[catch {set valid [$obj ::nsf::methods::object::info::lookupmethods -expand "$path *"]} errorMsg]} {
+      if {[catch {set valid [$obj ::nsf::methods::object::info::lookupmethods -path "$path *"]} errorMsg]} {
 	set valid ""
 	puts stderr "+++ UNKNOWN raises error $errorMsg"
       }
@@ -423,7 +423,7 @@
       set obj [uplevel {current object}]
       set path [current methodpath]
       set l [string length $path]
-      set submethods [$obj ::nsf::methods::object::info::lookupmethods -expand "$path *"]
+      set submethods [$obj ::nsf::methods::object::info::lookupmethods -path "$path *"]
       foreach sm $submethods {set results([lindex [string range $sm $l+1 end] 0]) 1}
       error "Valid submethods of $obj $path: [lsort [array names results]]"
     }