doing ->init_schema( sqlite_use_file => 1 ) in 92storage.t 89dbicadmin.t 33storage_re...
Johannes Plunien [Wed, 24 Sep 2008 21:26:06 +0000 (23:26 +0200)]
t/32connect_code_ref.t
t/33storage_reconnect.t
t/89dbicadmin.t
t/92storage.t

index 4b90532..9fe0e60 100644 (file)
@@ -8,7 +8,7 @@ use DBICTest;
 plan tests => 1;
 
 # Set up the "usual" sqlite for DBICTest
-my $normal_schema = DBICTest->init_schema;
+my $normal_schema = DBICTest->init_schema( sqlite_use_file => 1 );
 
 # Steal the dsn, which should be like 'dbi:SQLite:t/var/DBIxClass.db'
 my $normal_dsn = $normal_schema->storage->connect_info->[0];
index 8dcaeec..34dae6d 100644 (file)
@@ -13,7 +13,7 @@ my $db_orig = "$FindBin::Bin/var/DBIxClass.db";
 my $db_tmp  = "$db_orig.tmp";
 
 # Set up the "usual" sqlite for DBICTest
-my $schema = DBICTest->init_schema;
+my $schema = DBICTest->init_schema( sqlite_use_file => 1 );
 
 # Make sure we're connected by doing something
 my @art = $schema->resultset("Artist")->search({ }, { order_by => 'name DESC'});
index 8077664..095204d 100644 (file)
@@ -6,7 +6,7 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
-my $schema = DBICTest->init_schema();
+my $schema = DBICTest->init_schema( sqlite_use_file => 1 );
 
 eval 'require JSON::Any';
 plan skip_all => 'Install JSON::Any to run this test' if ($@);
index 127b66c..56fb7b4 100644 (file)
@@ -34,7 +34,7 @@ use DBICTest;
 
 plan tests => 6;
 
-my $schema = DBICTest->init_schema();
+my $schema = DBICTest->init_schema( sqlite_use_file => 1 );
 
 is( ref($schema->storage), 'DBIx::Class::Storage::DBI::SQLite',
     'Storage reblessed correctly into DBIx::Class::Storage::DBI::SQLite' );