plan (skip_all => 'Class::Trigger and DBIx::ContextualFetch required');
next;
}
- eval "use DBD::SQLite";
- plan $@ ? (skip_all => 'needs DBD::SQLite for testing') : (tests => 50);
+ plan tests => 50;
}
use lib 't/cdbi/testlib';
# 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";
eval { $film->actors->delete_all };
is $@, '', "Deleting again does no harm";
}
-
-} # end SKIP block