X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fcdbi%2Fcopy.t;h=f587ae03dcfe54fedaf8ef8b6bd7aa4cadf625ad;hb=83eef5621cc3a7b77a280b4b01f1175e9935fff6;hp=25eb2554078ff9fbb972fdd2ede6c004274c158c;hpb=50891152d0b24649bfd67bdba97feec86b11c064;p=dbsrgits%2FDBIx-Class.git diff --git a/t/cdbi/copy.t b/t/cdbi/copy.t index 25eb255..f587ae0 100644 --- a/t/cdbi/copy.t +++ b/t/cdbi/copy.t @@ -1,21 +1,17 @@ +use DBIx::Class::Optional::Dependencies -skip_all_without => 'cdbicompat'; + use strict; -use Test::More; +use warnings; -BEGIN { - eval "use DBIx::Class::CDBICompat;"; - plan $@ ? (skip_all => "Class::Trigger and DBIx::ContextualFetch required: $@") - : (tests=> 4); -} +use Test::More; -INIT { - use lib 't/cdbi/testlib'; -} +use lib 't/cdbi/testlib'; { - package # hide from PAUSE + package # hide from PAUSE MyFilm; - use base 'DBIx::Class::Test::SQLite'; + use base 'DBIC::Test::SQLite'; use strict; __PACKAGE__->set_table('Movies'); @@ -39,3 +35,4 @@ isnt $new_film->id, $film->id, "copy() gets new primary key"; $new_film = $film->copy(42); is $new_film->id, 42, "copy() with new id"; +done_testing;