X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fcdbi%2F12-filter.t;h=928bc70298a5fc3bde32508825f65e63c273ab2e;hb=d9bd5195;hp=bdc96878659d76b402c426c6876f12277b1c26fa;hpb=6a3bf2519832866d037740c5fb22341dad6f8bb3;p=dbsrgits%2FDBIx-Class.git diff --git a/t/cdbi/12-filter.t b/t/cdbi/12-filter.t index bdc9687..928bc70 100644 --- a/t/cdbi/12-filter.t +++ b/t/cdbi/12-filter.t @@ -1,16 +1,6 @@ use strict; use Test::More; -BEGIN { - eval "use DBIx::Class::CDBICompat;"; - if ($@) { - plan (skip_all => 'Class::Trigger and DBIx::ContextualFetch required'); - next; - } - eval "use DBD::SQLite"; - plan $@ ? (skip_all => 'needs DBD::SQLite for testing') : (tests => 50); -} - use lib 't/cdbi/testlib'; use Actor; use Film; @@ -129,10 +119,6 @@ test_normal_iterator; # make sure nothing gets clobbered; test_normal_iterator; -SKIP: { - #skip "dbic iterators don't support slice yet", 12; - - { my @acts = $film->actors->slice(1, 2); is @acts, 2, "Slice gives 2 actor"; @@ -154,7 +140,7 @@ SKIP: { package Class::DBI::My::Iterator; -use vars qw/@ISA/; +our @ISA; @ISA = ($it_class); @@ -178,4 +164,4 @@ delete $film->{related_resultsets}; is $@, '', "Deleting again does no harm"; } -} # end SKIP block +done_testing;