Index: library/xotcl/tests/testx.xotcl
===================================================================
diff -u -rb37bf2deab94b6294509fa79bb7b922d6e8a5635 -r24724ebae83af4e0104b349a2fb582bfc71a7475
--- library/xotcl/tests/testx.xotcl	(.../testx.xotcl)	(revision b37bf2deab94b6294509fa79bb7b922d6e8a5635)
+++ library/xotcl/tests/testx.xotcl	(.../testx.xotcl)	(revision 24724ebae83af4e0104b349a2fb582bfc71a7475)
@@ -4113,7 +4113,7 @@
   o foo
   o foo -foo 0
   catch {o foo -foo} msg
-  errorCheck $msg "Argument for parameter '-foo' expected" "Empty non-pos arg"
+  errorCheck $msg "Value for parameter '-foo' expected" "Empty non-pos arg"
   
   Object oa
   oa proc foo {{-a A} b} {