Index: library/nx/nx.tcl =================================================================== diff -u -rd86805a2250aaa861470d4f4a13945d603585aca -r639f14b881281818c88f1503887d4ef525510e9d --- library/nx/nx.tcl (.../nx.tcl) (revision d86805a2250aaa861470d4f4a13945d603585aca) +++ library/nx/nx.tcl (.../nx.tcl) (revision 639f14b881281818c88f1503887d4ef525510e9d) @@ -486,7 +486,8 @@ if {[catch {set obj [uplevel ::nsf::current]}]} { error "ensemble dispatch called outside of method context" } - set path [lrange [::nsf::current methodpath] 0 end-1] + ## set path [lrange [::nsf::current methodpath] 0 end-1] + set path [uplevel {::nsf::current methodpath}] set l [string length $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}