6 use DBIC::SqlMakerTest;
9 my $schema = DBICTest->init_schema();
12 # a regular belongs_to prefetch
13 my $cds = $schema->resultset('CD')->search ({}, { prefetch => 'artist' } );
21 # make sure null-prefetches do not screw with the final sql:
22 for my $type (keys %$nulls) {
24 $cds->search({}, { prefetch => { artist => $nulls->{$type} } })->as_query,
25 '( SELECT me.cdid, me.artist, me.title, me.year, me.genreid, me.single_track,
26 artist.artistid, artist.name, artist.rank, artist.charfield
29 ON artist.artistid = me.artist
31 "same sql with null $type prefetch"
35 # make sure left join is carried only starting from the first has_many
37 $cds->search({}, { prefetch => { artist => { cds => 'artist' } } })->as_query,
39 SELECT me.cdid, me.artist, me.title, me.year, me.genreid, me.single_track,
40 artist.artistid, artist.name, artist.rank, artist.charfield,
41 cds.cdid, cds.artist, cds.title, cds.year, cds.genreid, cds.single_track,
42 artist_2.artistid, artist_2.name, artist_2.rank, artist_2.charfield
44 JOIN artist artist ON artist.artistid = me.artist
45 LEFT JOIN cd cds ON cds.artist = artist.artistid
46 LEFT JOIN artist artist_2 ON artist_2.artistid = cds.artist