X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Finflate%2Fhri.t;h=b5e9d2f542c5e336bf2922aee2a0165cf47645dc;hb=cb551b079b096630988312e22becd87fb54fb7de;hp=eece6df89a369d1afe981d7bceabe241ec57df44;hpb=704a0f8ec36f8bd8e273f5ddb553b2f67ea83f06;p=dbsrgits%2FDBIx-Class-Historic.git

diff --git a/t/inflate/hri.t b/t/inflate/hri.t
index eece6df..b5e9d2f 100644
--- a/t/inflate/hri.t
+++ b/t/inflate/hri.t
@@ -2,6 +2,14 @@ use strict;
 use warnings;
 
 use Test::More;
+
+use DBIx::Class::_Util 'modver_gt_or_eq_and_lt';
+use base();
+BEGIN {
+  plan skip_all => 'base.pm 2.20 (only present in perl 5.19.7) is known to break this test'
+    if modver_gt_or_eq_and_lt( 'base', '2.19_01', '2.21' );
+}
+
 use Test::Exception;
 use lib qw(t/lib);
 use DBICTest;