Index: tests/submethods.test
===================================================================
diff -u -r17ad6747e40c1724810371f92f0108b12c1d5284 -r41559ade739ad3f4f4282d7b2626f850cfdef9c6
--- tests/submethods.test	(.../submethods.test)	(revision 17ad6747e40c1724810371f92f0108b12c1d5284)
+++ tests/submethods.test	(.../submethods.test)	(revision 41559ade739ad3f4f4282d7b2626f850cfdef9c6)
@@ -325,7 +325,7 @@
   ? {obj foo} {wrong # args: should be ":info"}
 
   # now we overwrite the object specific method with an object
-  ? {Object create obj::info} "cannot overwrite cmd ::ns1::obj::info; delete/rename it before overwriting"
+  ? {Object create obj::info} "refuse to overwrite cmd ::ns1::obj::info; delete/rename it before overwriting"
   rename obj::info ""
   ? {Object create obj::info} ::ns1::obj::info
   ? [list obj $infolookup info] ::ns1::obj::info