Integrate mainline

[p5sagit/p5-mst-13.2.git] / t / op / ver.t

diff --git a/t/op/ver.t b/t/op/ver.t
index 31bd09c..a7e57a6 100755 (executable)
--- a/t/op/ver.t
+++ b/t/op/ver.t
@@ -32,7 +32,7 @@ else { # EBCDIC
 
     # hash keys too
     $h{v150.146} = "ok";
-    is('ok',$h{v111.107},'ASCII hash keys');
+    is('ok',$h{v150.146},'EBCDIC hash keys');
 }
 
 # poetry optimization should also
@@ -208,7 +208,7 @@ my ($revision,$version,$subversion) = split '\.', sprintf("%vd",$^V);
 
 my $v = sprintf("%d.%.3d%.3d",$revision,$version,$subversion);
 
-ok( $v eq "$]", "\$^V eq \$] (string)");
+ok( $v eq "$]", qq{"\$^V eq "\$]"});
 
 $v = $revision + $version/1000 + $subversion/1000000;