X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fstorage%2Fdbi_env.t;h=fd5f1d6ce6099a92233b9b37f993e2653ab87206;hb=8d6b1478d8fa6f7c76e313ee72a72d5eb4c24d03;hp=a22b91c7e75e5d4160bf5a4acf7f1db6661365ba;hpb=d9bd51956470404b3960871d3413fa98f16961d2;p=dbsrgits%2FDBIx-Class.git

diff --git a/t/storage/dbi_env.t b/t/storage/dbi_env.t
index a22b91c..fd5f1d6 100644
--- a/t/storage/dbi_env.t
+++ b/t/storage/dbi_env.t
@@ -7,9 +7,10 @@ use Test::Exception;
 
 BEGIN { delete @ENV{qw(DBI_DSN DBI_DRIVER)} }
 
-my $schema;
+$ENV{DBICTEST_LOCK_HOLDER} = -1;
 
-DBICTest->init_schema(sqlite_use_file => 1);
+# pre-populate
+my $schema = DBICTest->init_schema(sqlite_use_file => 1);
 
 my $dbname = DBICTest->_sqlite_dbname(sqlite_use_file => 1);