X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fversion_storages%2Fstandard.t;h=d49b5de4f53c5bfb31fbed37fb9c4a3a606e3ba1;hb=73f7213439e3abcea33dd1830c0871f7fc916761;hp=c68356164559c7ed0fce09bda5e55de21a306ff3;hpb=adcce113e8f6e059100ca95e2e7ed9084f31e3ae;p=dbsrgits%2FDBIx-Class-DeploymentHandler.git

diff --git a/t/version_storages/standard.t b/t/version_storages/standard.t
index c683561..d49b5de 100644
--- a/t/version_storages/standard.t
+++ b/t/version_storages/standard.t
@@ -4,18 +4,18 @@ use strict;
 use warnings;
 
 use Test::More;
-use Test::Exception;
 
 use lib 't/lib';
 use DBICDHTest;
 use aliased 'DBIx::Class::DeploymentHandler::VersionStorage::Standard';
 use aliased 'DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator';
+use File::Temp 'tempdir';
 
 use DBICVersion_v1;
 use DBIx::Class::DeploymentHandler;
-my $dbh = DBI->connect('dbi:SQLite::memory:');
+my $dbh = DBICDHTest::dbh();
 my @connection = (sub { $dbh }, { ignore_version => 1 });
-my $sql_dir = 't/sql';
+my $sql_dir = tempdir( CLEANUP => 1 );
 
 my $s = DBICVersion::Schema->connect(@connection);
 {
@@ -25,8 +25,6 @@ my $s = DBICVersion::Schema->connect(@connection);
    like( $warning, qr/Your DB is currently unversioned. Please call upgrade on your schema to sync the DB/, 'warning when database is unversioned');
 }
 
-DBICDHTest::ready;
-
 my $dm = Translator->new({
    schema            => $s,
    script_directory => $sql_dir,