Resolve $rsrc instance duality on metadata traversal
[dbsrgits/DBIx-Class.git] / t / cdbi / 19-set_sql.t
index 73d9777..14cfc37 100644 (file)
@@ -1,13 +1,10 @@
+BEGIN { do "./t/lib/ANFANG.pm" or die ( $@ || $! ) }
+use DBIx::Class::Optional::Dependencies -skip_all_without => 'cdbicompat';
+
 use strict;
-use Test::More;
+use warnings;
 
-BEGIN {
-  eval "use DBIx::Class::CDBICompat;";
-  if ($@) {
-    plan (skip_all => 'Class::Trigger and DBIx::ContextualFetch required');
-  }
-  plan tests => 20;
-}
+use Test::More;
 
 use lib 't/cdbi/testlib';
 use Film;
@@ -128,3 +125,4 @@ Film->set_sql(
   is $apg[1]->title, "B", "and B";
 }
 
+done_testing;