Retire DBIC/SqlMakerTest.pm now that SQLA::Test provides the same function
[dbsrgits/DBIx-Class.git] / t / sqlmaker / order_by_func.t
CommitLineData
5e120ab6 1use strict;
2use warnings;
3use Test::More;
4
5use lib qw(t/lib);
a5a7bb73 6use DBICTest ':DiffSQL';
5e120ab6 7
8my $schema = DBICTest->init_schema();
9
10my $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 21my $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 27TODO: {
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
34done_testing;