+use DBIx::Class::Optional::Dependencies -skip_all_without => 'cdbicompat';
+
use strict;
-use Test::More;
+use warnings;
-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 => 6);
-}
+use Test::More;
use lib 't/cdbi/testlib';
use Film;
is( $it->next, undef, "next past end of page ok" );
# second page
-( $pager, $it ) = Film->page(
+( $pager, $it ) = Film->page(
{},
{ rows => 3,
page => 2 }
is( $pager->entries_on_this_page, 2, "entries on second page ok" );
is( $it->next->title, "Film 4", "second page first title ok" );
+
+done_testing;