X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fcdbi%2F26-mutator.t;h=a2030596b63207a44ecfacb22425bbf4cbbf902e;hb=4a233f3019d2baa4bf2abee0c873c74d5cdf3a11;hp=82049c3c77ae2081086119e974453d5fe2107613;hpb=68de943862f06cabd397d2e74d12cd9cdc999779;p=dbsrgits%2FDBIx-Class.git diff --git a/t/cdbi/26-mutator.t b/t/cdbi/26-mutator.t index 82049c3..a203059 100644 --- a/t/cdbi/26-mutator.t +++ b/t/cdbi/26-mutator.t @@ -1,13 +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 $@; - plan tests => 6; -} - use lib 't/cdbi/testlib'; require Film; @@ -27,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"; }; @@ -39,3 +33,4 @@ eval { }; is $@, '', "No errors"; +done_testing;