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';
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(