X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F07subqueries.t;h=2ea48e823bf7b71f758b8620268a360c81534b57;hb=428975b0;hp=28bac85ade52387e42589f104f4b9ffe2120238b;hpb=23401b818b099397e04df91b43340ecd59e8f92b;p=dbsrgits%2FSQL-Abstract.git diff --git a/t/07subqueries.t b/t/07subqueries.t index 28bac85..2ea48e8 100644 --- a/t/07subqueries.t +++ b/t/07subqueries.t @@ -36,7 +36,7 @@ push @tests, { #2 ($sub_stmt, @sub_bind) - = $sql->select("t1", "c1", {c2 => {"<" => 100}, + = $sql->select("t1", "c1", {c2 => {"<" => 100}, c3 => {-like => "foo%"}}); $where = { foo => 1234, @@ -49,7 +49,7 @@ push @tests, { }; #3 -($sub_stmt, @sub_bind) +($sub_stmt, @sub_bind) = $sql->select("t1", "*", {c1 => 1, c2 => \"> t0.c0"}); $where = { foo => 1234, @@ -73,7 +73,7 @@ push @tests, { #5 -($sub_stmt, @sub_bind) +($sub_stmt, @sub_bind) = $sql->where({age => [{"<" => 10}, {">" => 20}]}); $sub_stmt =~ s/^ where //i; # don't want "WHERE" in the subclause $where = {