Index: tests/info-variable.test
===================================================================
diff -u -N -r88fcf6ba94c9eea2caff8238f891d127b63e8093 -rb7c4ed543a96820dfcabddb05317236067714b4f
--- tests/info-variable.test	(.../info-variable.test)	(revision 88fcf6ba94c9eea2caff8238f891d127b63e8093)
+++ tests/info-variable.test	(.../info-variable.test)	(revision b7c4ed543a96820dfcabddb05317236067714b4f)
@@ -143,7 +143,7 @@
   ? {::Foo info slots p} "::Foo::slot::____Foo.p"
 
   set ::vs [lsort [::Foo info variables]]
-  ? {join [lmap handle $vs {::Foo info variable definition $handle}] \n} \
+  ? {join [lmap handle $::vs {::Foo info variable definition $handle}] \n} \
 "::Foo variable -accessor private p 19
 ::Foo property -accessor none a:integer
 ::Foo property -accessor none {b:integer 123}