Commit | Line | Data |
5e120ab6 |
1 | use strict; |
2 | use warnings; |
3 | use Test::More; |
4 | |
5 | use lib qw(t/lib); |
a5a7bb73 |
6 | use DBICTest ':DiffSQL'; |
5e120ab6 |
7 | |
8 | my $schema = DBICTest->init_schema(); |
9 | |
10 | my $rs = $schema->resultset('CD')->search({}, { |
11 | 'join' => 'tracks', |
22912b45 |
12 | order_by => { |
5e120ab6 |
13 | -desc => { |
22912b45 |
14 | count => 'tracks.track_id', |
5e120ab6 |
15 | }, |
22912b45 |
16 | }, |
5e120ab6 |
17 | distinct => 1, |
18 | rows => 2, |
22912b45 |
19 | page => 1, |
5e120ab6 |
20 | }); |
22912b45 |
21 | my $match = q{ |
22 | SELECT me.cdid, me.artist, me.title, me.year, me.genreid, me.single_track FROM cd me |
23 | GROUP BY me.cdid, me.artist, me.title, me.year, me.genreid, me.single_track |
24 | ORDER BY COUNT(tracks.trackid) DESC |
25 | }; |
5e120ab6 |
26 | |
22912b45 |
27 | TODO: { |
28 | todo_skip 'order_by using function', 2; |
29 | is_same_sql($rs->as_query, $match, 'order by with func query'); |
5e120ab6 |
30 | |
22912b45 |
31 | ok($rs->count == 2, 'amount of rows return in order by func query'); |
32 | } |
5e120ab6 |
33 | |
34 | done_testing; |