Index: tests/varresolutiontest.tcl
===================================================================
diff -u -r18122dd21b99cf0d5b4cd01635048641a23aa051 -rd168a26bce713de8daa5bbe79d740926e961c5bc
--- tests/varresolutiontest.tcl	(.../varresolutiontest.tcl)	(revision 18122dd21b99cf0d5b4cd01635048641a23aa051)
+++ tests/varresolutiontest.tcl	(.../varresolutiontest.tcl)	(revision d168a26bce713de8daa5bbe79d740926e961c5bc)
@@ -709,7 +709,7 @@
   set :Z 1
   set ZZZ 1
   :method bar {z} { return $z }
-  :object method bar {z} { return $z }
+  :class-object method bar {z} { return $z }
   :create v {
     set zzz 2
     set :z 2
@@ -726,7 +726,7 @@
     set :Z 1
     set ZZZ 1
     :method bar {z} { return $z }
-    :object method bar {z} { return $z }
+    :class-object method bar {z} { return $z }
     :create v {
       set :z 2
       set zzz 2