X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fcdbi%2F26-mutator.t;h=a2030596b63207a44ecfacb22425bbf4cbbf902e;hb=5b3090637dc0ea8949627267561820b43ff8e1cb;hp=7ba95bda13fb0aac70725d6a428d5d301f54c721;hpb=6a3bf2519832866d037740c5fb22341dad6f8bb3;p=dbsrgits%2FDBIx-Class.git diff --git a/t/cdbi/26-mutator.t b/t/cdbi/26-mutator.t index 7ba95bd..a203059 100644 --- a/t/cdbi/26-mutator.t +++ b/t/cdbi/26-mutator.t @@ -1,19 +1,7 @@ use strict; +use warnings; use Test::More; -BEGIN { - eval "use DBIx::Class::CDBICompat;"; - plan skip_all => "Class::Trigger and DBIx::ContextualFetch required: $@" - if $@; -} - -BEGIN { - eval "use DBD::SQLite"; - plan $@ - ? (skip_all => 'needs DBD::SQLite for testing') - : (tests => 6); -} - use lib 't/cdbi/testlib'; require Film; @@ -33,7 +21,7 @@ my $bt; eval { my $data = $data; $data->{sheep} = 1; - ok $bt = Film->insert($data), "Modified accessor - with + ok $bt = Film->insert($data), "Modified accessor - with accessor"; isa_ok $bt, "Film"; }; @@ -45,3 +33,4 @@ eval { }; is $@, '', "No errors"; +done_testing;