X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fresultset%2Fas_query.t;h=39bf88ce74f7417c45936a55571448b45134545e;hb=8d005ad9929e4bf227919cb6374e2a9e9689324f;hp=0e770784042c0b4f409d51a0add1524a7702270b;hpb=0e773352a9c6c034dfb2526b8d68bf6ac1e2323b;p=dbsrgits%2FDBIx-Class.git diff --git a/t/resultset/as_query.t b/t/resultset/as_query.t index 0e77078..39bf88c 100644 --- a/t/resultset/as_query.t +++ b/t/resultset/as_query.t @@ -3,8 +3,6 @@ use warnings; use Test::More; -plan ( tests => 5 ); - use lib qw(t/lib); use DBICTest; use DBIC::SqlMakerTest; @@ -45,8 +43,8 @@ my $rank_resolved_bind = [ { is_same_sql_bind( $art_rs->as_query, - "(SELECT me.artistid, me.name, me.rank, me.charfield FROM artist me WHERE ( ( ( rank = ? ) AND ( name = ? ) ) ) )", - [ $rank_resolved_bind, $name_resolved_bind ], + "(SELECT me.artistid, me.name, me.rank, me.charfield FROM artist me WHERE name = ? AND rank = ? )", + [ $name_resolved_bind, $rank_resolved_bind ], ); } @@ -55,8 +53,8 @@ my $rscol = $art_rs->get_column( 'charfield' ); { is_same_sql_bind( $rscol->as_query, - "(SELECT me.charfield FROM artist me WHERE ( ( ( rank = ? ) AND ( name = ? ) ) ) )", - [ $rank_resolved_bind, $name_resolved_bind ], + "(SELECT me.charfield FROM artist me WHERE name = ? AND rank = ? )", + [ $name_resolved_bind, $rank_resolved_bind ], ); } @@ -68,3 +66,28 @@ my $rscol = $art_rs->get_column( 'charfield' ); my $subsel_rs = $schema->resultset("CD")->search( { cdid => { IN => $rs->get_column('cdid')->as_query } } ); is($subsel_rs->count, $rs->count, 'Subselect on PK got the same row count'); } + + +is_same_sql_bind($schema->resultset('Artist')->search({ + rank => 1, +}, { + from => $schema->resultset('Artist')->search({ 'name' => 'frew'})->as_query, +})->as_query, + '(SELECT me.artistid, me.name, me.rank, me.charfield FROM ( + SELECT me.artistid, me.name, me.rank, me.charfield FROM + artist me + WHERE ( + ( name = ? ) + ) + ) WHERE ( + ( rank = ? ) + ) + )', + [ + [{ dbic_colname => 'name', sqlt_datatype => 'varchar', sqlt_size => 100 }, 'frew'], + [{ dbic_colname => 'rank' }, 1], + ], + 'from => ...->as_query works' +); + +done_testing;