X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F60core.t;h=f92159b290128fadf702c3b87ba0f3f0f03f6623;hb=76cc4546dfc51e7d83add9a90af1eb2d5a7d156c;hp=f2e363abde448099dcabd7c791ec55180995531b;hpb=fb88ca2c952ef2e17f6e8a414079f12f71761ff7;p=dbsrgits%2FDBIx-Class.git diff --git a/t/60core.t b/t/60core.t index f2e363a..f92159b 100644 --- a/t/60core.t +++ b/t/60core.t @@ -5,8 +5,7 @@ use Test::More; use Test::Exception; use Test::Warn; use lib qw(t/lib); -use DBICTest; -use DBIC::SqlMakerTest; +use DBICTest ':DiffSQL'; my $schema = DBICTest->init_schema(); @@ -131,6 +130,13 @@ throws_ok { is($schema->resultset("Artist")->count, 4, 'count ok'); +# test find on an unresolvable condition +is( + $schema->resultset('Artist')->find({ artistid => [ -and => 1, 2 ]}), + undef +); + + # test find_or_new { my $existing_obj = $schema->resultset('Artist')->find_or_new({