X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2F35-stash.t;fp=t%2F35-stash.t;h=24034832064399cb33c740a61f691dac3f4e061f;hb=78d307d30a1fa82e6b8e7ba95c617d9b87eb4d45;hp=ac004677e69bfa1836087af2476e8b3bd5e0a858;hpb=de835bf83e502c2787cbf91fcd99d1961179f4d9;p=perl%2Fmodules%2FVariable-Magic.git

diff --git a/t/35-stash.t b/t/35-stash.t
index ac00467..2403483 100644
--- a/t/35-stash.t
+++ b/t/35-stash.t
@@ -96,7 +96,7 @@ cast %Hlagh::, $wiz;
  is $@, "ok\n", 'stash: function calls compiled fine';
  is_deeply \%mg, {
   fetch => \@calls,
-  store => ("$]" < 5.011002 ? \@calls : [ map { ($_) x 2 } @calls ]),
+  store => ("$]" < 5.011_002 ? \@calls : [ map { ($_) x 2 } @calls ]),
  }, 'stash: function calls';
 }
 
@@ -295,7 +295,7 @@ $_ => sub {
 CB
 } qw<fetch store exists delete>);
 
-my $uo_exp = "$]" < 5.011002 ? 2 : 3;
+my $uo_exp = "$]" < 5.011_002 ? 2 : 3;
 
 $code .= ', data => sub { +{ guard => 0 } }';