X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F73oracle_hq.t;h=8189479d9ae94476c8d2d5c35ca3d7d552e14e06;hb=dbcd18a7224e70a2b1fe0a369397819569376c85;hp=538fdf8ba66ec64ca5fe42956d2429e0c6c816f1;hpb=cccd1876f48654bb612e8f3f9b16d786321340d2;p=dbsrgits%2FDBIx-Class.git diff --git a/t/73oracle_hq.t b/t/73oracle_hq.t index 538fdf8..8189479 100644 --- a/t/73oracle_hq.t +++ b/t/73oracle_hq.t @@ -5,6 +5,7 @@ use Test::Exception; use Test::More; use DBIx::Class::Optional::Dependencies (); use lib qw(t/lib); +use DBICTest::RunMode; use DBIC::SqlMakerTest; use DBIx::Class::SQLMaker::LimitDialects; @@ -38,6 +39,7 @@ BEGIN { ); } +use DBICTest; use DBICTest::Schema; my $schema = DBICTest::Schema->connect($dsn, $user, $pass); @@ -323,7 +325,7 @@ do_creates($dbh); is_same_sql_bind ( $rs->as_query, '( - SELECT artistid, name, rank, charfield, parentid + SELECT me.artistid, me.name, me.rank, me.charfield, me.parentid FROM ( SELECT me.artistid, me.name, me.rank, me.charfield, me.parentid FROM artist me @@ -350,7 +352,7 @@ do_creates($dbh); '( SELECT COUNT( * ) FROM ( - SELECT artistid + SELECT me.artistid FROM ( SELECT me.artistid FROM artist me