6 use DBICTest ':DiffSQL';
8 my $schema = DBICTest->init_schema();
11 # a regular belongs_to prefetch
12 my $cds = $schema->resultset('CD')->search ({}, { prefetch => 'artist' } );
20 # make sure null-prefetches do not screw with the final sql:
21 for my $type (keys %$nulls) {
23 $cds->search({}, { prefetch => { artist => $nulls->{$type} } })->as_query,
24 '( SELECT me.cdid, me.artist, me.title, me.year, me.genreid, me.single_track,
25 artist.artistid, artist.name, artist.rank, artist.charfield
28 ON artist.artistid = me.artist
30 "same sql with null $type prefetch"
34 # make sure left join is carried only starting from the first has_many
36 $cds->search({}, { prefetch => { artist => { cds => 'artist' } } })->as_query,
38 SELECT me.cdid, me.artist, me.title, me.year, me.genreid, me.single_track,
39 artist.artistid, artist.name, artist.rank, artist.charfield,
40 cds.cdid, cds.artist, cds.title, cds.year, cds.genreid, cds.single_track,
41 artist_2.artistid, artist_2.name, artist_2.rank, artist_2.charfield
43 JOIN artist artist ON artist.artistid = me.artist
44 LEFT JOIN cd cds ON cds.artist = artist.artistid
45 LEFT JOIN artist artist_2 ON artist_2.artistid = cds.artist