X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Frun%2F16joins.tl;fp=t%2Frun%2F16joins.tl;h=bfab9386db6f2270b9dfc460b04fdb9af7013e25;hb=8839560b9a5ec14ea4a921831a46962a2a74d87a;hp=5ea8749dc9a2b07f48030607e9bc5730fa70b3e4;hpb=2d9a191d23bbc38995aefa19ae7a59f3333cb67a;p=dbsrgits%2FDBIx-Class.git diff --git a/t/run/16joins.tl b/t/run/16joins.tl index 5ea8749..bfab938 100644 --- a/t/run/16joins.tl +++ b/t/run/16joins.tl @@ -7,7 +7,7 @@ BEGIN { eval "use DBD::SQLite"; plan $@ ? ( skip_all => 'needs DBD::SQLite for testing' ) - : ( tests => 41 ); + : ( tests => 42 ); } # figure out if we've got a version of sqlite that is older than 3.2.6, in @@ -253,24 +253,16 @@ SKIP: { cmp_ok( $rs->count, '==', 3, "count() ok after group_by on related column" ); } -$rs = $schema->resultset("CD")->search( +$rs = $schema->resultset("Artist")->search( {}, - { join => [qw/ artist /], group_by => [qw/ artist.name /], having =>{ 'MAX(cd.id)'=>{'<',5 } } } + { join => [qw/ cds /], group_by => [qw/ me.name /], having =>{ 'MAX(cds.cdid)'=>{'<',5 } } } ); -SKIP: { - skip "SQLite < 3.2.6 doesn't understand COUNT(DISTINCT())", 1 - if $is_broken_sqlite; - cmp_ok( $rs->count, '==', 2, "count() ok after group_by on related column with a having" ); -} +cmp_ok( $rs->all, '==', 2, "results ok after group_by on related column with a having" ); -$rs = $rs->search( {1=>1}, { having =>{ 'count(*)'=>{'>',2 } }}); +$rs = $rs->search( undef, { having =>{ 'count(*)'=>{'>',2 } }}); -SKIP: { - skip "SQLite < 3.2.6 doesn't understand COUNT(DISTINCT())", 1 - if $is_broken_sqlite; - cmp_ok( $rs->count, '==', 1, "count() ok after group_by on related column with a having" ); -} +cmp_ok( $rs->all, '==', 1, "count() ok after group_by on related column with a having" ); $rs = $schema->resultset("Artist")->search( { 'cds.title' => 'Spoonful of bees',