X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F19quotes.t;h=c4768c8d6d91e4cfcbb7b640dc95477266e7559f;hb=f2b70f86c9c44eb3367bd2d4d629f7e201032652;hp=2412e1d04cf716bcdb2ac19e367ba7c1556cbf00;hpb=9b4591296c196ea0a32e67159e35091b02ecc539;p=dbsrgits%2FDBIx-Class.git diff --git a/t/19quotes.t b/t/19quotes.t index 2412e1d..c4768c8 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,19 +14,18 @@ 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/)); +#diag('Testing against ' . join(' ', map { $schema->storage->dbh->get_info($_) } qw/17 18/)); $schema->storage->sql_maker->quote_char('`'); $schema->storage->sql_maker->name_sep('.'); -my ($sql, @bind) = (''); -$schema->storage->debugobj(DBICTest::DBICDebugObj->new(\$sql, \@bind)); +my ($sql, @bind); +$schema->storage->debugobj(DBIC::DebugObj->new(\$sql, \@bind)); $schema->storage->debug(1); my $rs;