X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FVariable-Magic.git;a=blobdiff_plain;f=t%2F22-len.t;fp=t%2F22-len.t;h=8decac97bd98ec0cd4fa12c0e4011f6772154ed0;hp=6f556e672f7e9b1cc59f85a151161476637976fc;hb=6dda2004e92c396ae6989e032a5ecab766ae0cd4;hpb=5cb75b4b7f90a765f5ccdd72814ebb5c89356388

diff --git a/t/22-len.t b/t/22-len.t
index 6f556e6..8decac9 100644
--- a/t/22-len.t
+++ b/t/22-len.t
@@ -166,7 +166,10 @@ SKIP: {
  }
 }
 
-{
+SKIP: {
+ skip 'len magic is no longer called for negative array indices' => 5
+                                                           if "$]" >= 5.025_004;
+
  my @val = (4 .. 6);
 
  my $wv = init_value @val, 'len', 'len';