find/next change to return undef rather than () on fail from Bernhard Graf
[dbsrgits/DBIx-Class.git] / t / 30dbicplain.t
CommitLineData
50041f3c 1#!/usr/bin/perl
2
3use strict;
4use warnings;
5use Test::More;
6
cd67f809 7use lib qw(t/lib);
1752dc15 8use DBICTest::Plain;
50041f3c 9
cd67f809 10plan tests => 1;
50041f3c 11
12cmp_ok(DBICTest::Plain->resultset('Test')->count, '>', 0, 'count is valid');