X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fresultset%2Fas_query.t;h=97dd3e4ac2aeb8c849a1a957920d7570302e260e;hb=c7a9d1027d40e6b3275cb26db68141b152f3bd13;hp=5211637a95fb645704746eba0aaeb57f5ed2a945;hpb=70eb901c022556ae982cbd55b4f738af20d2a302;p=dbsrgits%2FDBIx-Class.git diff --git a/t/resultset/as_query.t b/t/resultset/as_query.t index 5211637..97dd3e4 100644 --- a/t/resultset/as_query.t +++ b/t/resultset/as_query.t @@ -52,23 +52,24 @@ $art_rs = $art_rs->search({ rank => 2 }); ); } +{my $sql = $art_rs->as_sql; warn "$sql\n";} + my $rscol = $art_rs->get_column( 'charfield' ); { - my $arr = $rscol->as_query; + my $arr = $rscol->as_subselect; my ($query, @bind) = @{$$arr}; is_same_sql_bind( $query, \@bind, - "SELECT me.charfield FROM artist me WHERE ( ( ( rank = ? ) AND ( name = ? ) ) )", + "( SELECT me.charfield FROM artist me WHERE ( ( ( rank = ? ) AND ( name = ? ) ) ) )", [ [ rank => 2 ], [ name => 'Billy Joel' ] ], ); } +{my $sql = $rscol->as_sql; warn "$sql\n";} my $cdrs2 = $cdrs->search({ - artist_id => { - -in => $art_rs->get_column( 'id' )->as_query, - }, + artist_id => $art_rs->get_column( 'id' )->as_query, }); warn Dumper $cdrs2->as_query; __END__