X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F19quotes.t;h=622eefb83ea65add3e92dac2b56e588ca974c9b2;hb=3ebc5603d1fb51f7d15c18c1d80a043495d93f9e;hp=19d4031f1cbcb4b31dc66bef0b7e42b78a774aef;hpb=949172b0fa30a832d268c3f55f97247a10742314;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/t/19quotes.t b/t/19quotes.t index 19d4031..622eefb 100644 --- a/t/19quotes.t +++ b/t/19quotes.t @@ -3,6 +3,8 @@ use warnings; use Test::More; use IO::File; + +use lib qw(t/lib); use DBIC::SqlMakerTest; BEGIN { @@ -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)); +$schema->storage->debugobj(DBIC::DebugObj->new(\$sql, \@bind)); $schema->storage->debug(1); my $rs;