use strict;
+use warnings;
use Test::More;
-BEGIN {
- 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/cdbi/testlib';
use Film;
is $freeaa && $freeaa->codirector, '2001-03-03', "Set the codirector";
}
+done_testing;
+
__DATA__
use CGI::Untaint;
return 1;
});
}
-