X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Frow%2Finflate_result.t;h=ecdd68c5e11b4ed3c95c2b4d8012b98e497e61a7;hb=6395604e3a53f12676a9bd7d51a6f113cc0d855b;hp=7606a5417b53405689dd9ce018fa6656337c6594;hpb=b9df8e39d03e6da167b2598f6ee70fb16c069112;p=dbsrgits%2FDBIx-Class.git diff --git a/t/row/inflate_result.t b/t/row/inflate_result.t index 7606a54..ecdd68c 100644 --- a/t/row/inflate_result.t +++ b/t/row/inflate_result.t @@ -1,3 +1,11 @@ +use warnings; +use strict; + +use Test::More; + +use lib qw(t/lib); +use DBICTest; + package My::Schema::Result::User; use strict; @@ -58,12 +66,6 @@ My::Schema->register_class( User => 'My::Schema::Result::User' ); 1; package main; - -use lib qw(t/lib); -use DBICTest; - -use Test::More; - my $user_data = { email => 'someguy@place.com', password => 'pass1', @@ -76,7 +78,7 @@ my $admin_data = { admin => 1 }; -ok( my $schema = My::Schema->connection('dbi:SQLite:dbname=:memory:') ); +ok( my $schema = My::Schema->connection(DBICTest->_database) ); ok( $schema->storage->dbh->do(