Index: library/nx/nx.tcl =================================================================== diff -u -r0595a14ffaf82764ce8bcc642741cd8ded14dc38 -r29ed0c8902296dbea451c12d031cc06b6126dd5b --- library/nx/nx.tcl (.../nx.tcl) (revision 0595a14ffaf82764ce8bcc642741cd8ded14dc38) +++ library/nx/nx.tcl (.../nx.tcl) (revision 29ed0c8902296dbea451c12d031cc06b6126dd5b) @@ -479,12 +479,13 @@ set path [lrange $callInfo 1 end-1]; # set path [current methodpath] set m [lindex $callInfo end] set obj [lindex $callInfo 0] - # puts stderr "+++ UNKNOWN ARGS=[current args] obj $obj '$m' callInfo=$callInfo args=$args // path '[current methodpath]'" + #puts stderr "### [list $obj ::nsf::methods::object::info::lookupmethods -path \"$path *\"]" if {[catch {set valid [$obj ::nsf::methods::object::info::lookupmethods -path "$path *"]} errorMsg]} { set valid "" puts stderr "+++ UNKNOWN raises error $errorMsg" } set ref "\"$m\" of $obj $path" +puts stderr "***VALID <[lsort $valid]>" error "Unable to dispatch sub-method $ref; valid are: [join [lsort $valid] {, }]" }