X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fcdbi-t%2F19-set_sql.t;h=36b66af8843aefa7b1914775577eae18f63af76b;hb=81092e2d683da60a94ad7d356cdff8bfbb49012f;hp=2278cd4a6b32e7b3ff1a5abf92063423eea58a9a;hpb=5a66aa65d09bd48eb710e6d3ffccfcf20f2e7bd9;p=dbsrgits%2FDBIx-Class.git

diff --git a/t/cdbi-t/19-set_sql.t b/t/cdbi-t/19-set_sql.t
index 2278cd4..36b66af 100644
--- a/t/cdbi-t/19-set_sql.t
+++ b/t/cdbi-t/19-set_sql.t
@@ -2,8 +2,13 @@ use strict;
 use Test::More;
 
 BEGIN {
-	eval "use DBD::SQLite";
-	plan $@ ? (skip_all => 'needs DBD::SQLite for testing') : (tests => 17);
+  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 => 17);
 }
 
 use lib 't/testlib';
@@ -62,8 +67,6 @@ Film->set_sql(
 	is $pgs[1]->id, $f4->id, "and F4";
 };
 
-SKIP: {
-  skip "DBIx::Class doesn't have has_a yet", 6;
 {
 	Actor->has_a(film => "Film");
 	Film->set_sql(
@@ -106,4 +109,4 @@ SKIP: {
 	is $apg[1]->title, "B", "and B";
 }
 
-} # end SKIP block
+#} # end SKIP block