X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fstrictures.t;fp=t%2Fstrictures.t;h=5dd1953a8b7bbb4d8e726d4fddec0707957da3bf;hb=084caaf3333363995b31eb2f4b2e7c6bcfda9146;hp=e6da256d575c9bceba72275bf7f70a373fd97cb2;hpb=63e01e110da862927b2c8b79a7ad604a183ce736;p=p5sagit%2Fstrictures.git

diff --git a/t/strictures.t b/t/strictures.t
index e6da256..5dd1953 100644
--- a/t/strictures.t
+++ b/t/strictures.t
@@ -30,7 +30,9 @@ foreach my $idx (0 .. $#us) {
   is($us[$idx][1], $expect[$idx][1], 'Warnings ok for case '.($idx+1));
 }
 
-{
+SKIP: {
+  skip 'Extra tests disabled on perls <= 5.008003', 1
+    if $] < 5.008004;
   local $0 = 't/00load.t';
   sub Foo::new { 1 }
   chdir("t/smells-of-vcs");