X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F19quotes.t;h=d8ba469d745e2d92563dc0754e2f8a024d6e21f6;hb=ff57f45bf455ea502418094f56c849eef3cac909;hp=2412e1d04cf716bcdb2ac19e367ba7c1556cbf00;hpb=9b4591296c196ea0a32e67159e35091b02ecc539;p=dbsrgits%2FDBIx-Class.git diff --git a/t/19quotes.t b/t/19quotes.t index 2412e1d..d8ba469 100644 --- a/t/19quotes.t +++ b/t/19quotes.t @@ -3,7 +3,9 @@ use warnings; use Test::More; use IO::File; -use SQL::Abstract::Test import => ['is_same_sql_bind']; + +use lib qw(t/lib); +use DBIC::SqlMakerTest; BEGIN { eval "use DBD::SQLite"; @@ -12,10 +14,9 @@ BEGIN { : ( tests => 7 ); } -use lib qw(t/lib); use_ok('DBICTest'); -use_ok('DBICTest::DBICDebugObj'); +use_ok('DBIC::DebugObj'); my $schema = DBICTest->init_schema(); diag('Testing against ' . join(' ', map { $schema->storage->dbh->get_info($_) } qw/17 18/)); @@ -24,7 +25,7 @@ $schema->storage->sql_maker->quote_char('`'); $schema->storage->sql_maker->name_sep('.'); my ($sql, @bind) = (''); -$schema->storage->debugobj(DBICTest::DBICDebugObj->new(\$sql, \@bind)); +$schema->storage->debugobj(DBIC::DebugObj->new(\$sql, \@bind)); $schema->storage->debug(1); my $rs;