X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fprefetch%2Fvia_search_related.t;fp=t%2Fprefetch%2Fvia_search_related.t;h=fbaeeefba620adb0583f534ffa37fd36b7260409;hb=d992eae84cb89cbd3ed6b8753e2fbfb67571e032;hp=a9f3f8a0218b8aefb049a46a3bfa0d69ae1791cc;hpb=285dd1d62d2f2e89fd3e8eed3336aa5b1970a4e2;p=dbsrgits%2FDBIx-Class.git diff --git a/t/prefetch/via_search_related.t b/t/prefetch/via_search_related.t index a9f3f8a..fbaeeef 100644 --- a/t/prefetch/via_search_related.t +++ b/t/prefetch/via_search_related.t @@ -109,26 +109,30 @@ lives_ok (sub { is($rs->search_related('cds')->count, 4, 'prefetch without distinct (count)'); - $rs = $artist_rs->search(undef, {distinct => 1}) - ->search_related('cds')->search_related('genre', + $rs = $artist_rs->search_related('cds', {}, { distinct => 1})->search_related('genre', { 'genre.name' => 'vague genre' }, ); + is($rs->all, 2, 'distinct does not propagate over search_related (objects)'); + is($rs->count, 2, 'distinct does not propagate over search_related (count)'); + + $rs = $rs->search ({}, { distinct => 1} ); is($rs->all, 1, 'distinct without prefetch (objects)'); is($rs->count, 1, 'distinct without prefetch (count)'); - $rs = $artist_rs->search({}, {distinct => 1}) - ->search_related('cds')->search_related('genre', + $rs = $artist_rs->search_related('cds')->search_related('genre', { 'genre.name' => 'vague genre' }, - { prefetch => 'cds' }, + { prefetch => 'cds', distinct => 1 }, ); is($rs->all, 1, 'distinct with prefetch (objects)'); is($rs->count, 1, 'distinct with prefetch (count)'); + + TODO: { + local $TODO = "This makes another 2 trips to the database, it can't be right"; # artist -> 2 cds -> 2 genres -> 2 cds for each genre + distinct = 2 is($rs->search_related('cds')->all, 2, 'prefetched distinct with prefetch (objects)'); is($rs->search_related('cds')->count, 2, 'prefetched distinct with prefetch (count)'); - - + } }, 'distinct generally works with prefetch on deep search_related chains');