Index: tests/mixinoftest.tcl
===================================================================
diff -u -rf3cb5afe6aa1b6761b4a9909058f64ff7d64ab92 -re548a952433b4d26794f535995c9ed1ababe8807
--- tests/mixinoftest.tcl	(.../mixinoftest.tcl)	(revision f3cb5afe6aa1b6761b4a9909058f64ff7d64ab92)
+++ tests/mixinoftest.tcl	(.../mixinoftest.tcl)	(revision e548a952433b4d26794f535995c9ed1ababe8807)
@@ -51,17 +51,17 @@
 
 ? {o info mixin} ::M
 ? {o info precedence} "::M ::nx::Object"
-? {o info callable -which foo} "::M method foo args {puts x;next}"
+? {o info callable method foo} "::nsf::classes::M::foo"
 
 Class create M {:method foo args next}
 ? {o info mixin} ::M
 ? {o info precedence} "::M ::nx::Object"
-? {o info callable -which foo} "::M method foo args next"
+? {o info callable method foo} "::nsf::classes::M::foo"
 
 M destroy
 ? {o info mixin} ""
 ? {o info precedence} "::nx::Object"
-? {o info callable -which foo} ""
+? {o info callable method foo} ""
 
 o destroy