X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=dbsrgits%2FDBIx-Class.git;a=blobdiff_plain;f=t%2Fcdbi%2F16-reserved.t;h=380c8193a974407e1646e9f6131c98c3c2409aed;hp=201042b0b0f8be787b49be11987eaa25e148485f;hb=d9bd51956470404b3960871d3413fa98f16961d2;hpb=aea59b74d807ee65b319f3c1f84709157e12926b diff --git a/t/cdbi/16-reserved.t b/t/cdbi/16-reserved.t index 201042b..380c819 100644 --- a/t/cdbi/16-reserved.t +++ b/t/cdbi/16-reserved.t @@ -1,17 +1,9 @@ use strict; use Test::More; -BEGIN { - eval "use DBIx::Class::CDBICompat;"; - if ($@) { - plan (skip_all => 'Class::Trigger and DBIx::ContextualFetch required'); - } - plan tests => 5; -} - use lib 't/cdbi/testlib'; -require Film; -require Order; +use Film; +use Order; Film->has_many(orders => 'Order'); Order->has_a(film => 'Film'); @@ -32,3 +24,5 @@ my $infilm = $bto->film; isa_ok $infilm, "Film"; is $infilm->id, $film->id, "Orders hasa Film"; + +done_testing;