X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fcdbi-t%2F13-constraint.t;fp=t%2Fcdbi-t%2F13-constraint.t;h=02e8cdf16a96699bd4b3c2c9942afde8a7d8f7f8;hb=289ba852733fc488dc43cd474f47780f7fa1771e;hp=c25227acde8a0fabf5f778532a27459ed8499208;hpb=701da8c4d6f0b78ffc015085aa410a6cacfcdb40;p=dbsrgits%2FDBIx-Class.git

diff --git a/t/cdbi-t/13-constraint.t b/t/cdbi-t/13-constraint.t
index c25227a..02e8cdf 100644
--- a/t/cdbi-t/13-constraint.t
+++ b/t/cdbi-t/13-constraint.t
@@ -2,8 +2,13 @@ use strict;
 use Test::More;
 
 BEGIN {
-	eval "use DBD::SQLite";
-	plan $@ ? (skip_all => 'needs DBD::SQLite for testing') : (tests => 23);
+  eval "use DBIx::Class::CDBICompat;";
+  if ($@) {
+    plan (skip_all => 'Class::Trigger and DBIx::ContextualFetch required');
+    next;
+  }
+  eval "use DBD::SQLite";
+  plan $@ ? (skip_all => 'needs DBD::SQLite for testing') : (tests => 23);
 }
 
 use lib 't/testlib';