X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fcdbi%2F01-columns.t;h=827684d2d3fc9c1ac64332cf5d3df0f072bb9621;hb=1fb834df6d7a98d9d9c245a59f76b4602158451f;hp=e0c362b9b30b9c9236db0f1dbf78b085334456fb;hpb=6a3bf2519832866d037740c5fb22341dad6f8bb3;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/t/cdbi/01-columns.t b/t/cdbi/01-columns.t index e0c362b..827684d 100644 --- a/t/cdbi/01-columns.t +++ b/t/cdbi/01-columns.t @@ -1,13 +1,12 @@ +BEGIN { do "./t/lib/ANFANG.pm" or die ( $@ || $! ) } +use DBIx::Class::Optional::Dependencies -skip_all_without => 'cdbicompat'; + use strict; +use warnings; use Test::More; use lib 't/cdbi/testlib'; -BEGIN { - eval "use DBIx::Class::CDBICompat;"; - plan $@ ? (skip_all => "Class::Trigger and DBIx::ContextualFetch required: $@") : (tests=> 24); -} - #----------------------------------------------------------------------- # Make sure that we can set up columns properly @@ -101,8 +100,8 @@ ok(!State->find_column('HGLAGAGlAG'), '!find_column HGLAGAGlAG'); } { - SKIP: { - skip "No column objects", 1; + { + local $TODO = "No column objects"; eval { my @grps = State->__grouper->groups_for("Huh"); }; ok $@, "Huh not in groups"; @@ -152,3 +151,4 @@ is join (' ', sort A->columns), 'id', "A columns"; is join (' ', sort A::B->columns), 'b1 id', "A::B columns"; is join (' ', sort A::C->columns), 'c1 c2 c3 id', "A::C columns"; +done_testing;