X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fversion_storages%2Fstandard.t;h=2d049a50fdaf2bed4c1b3cf48c634cb0ebad7e0a;hb=7b3d00f984e43c319a637332579e950376637a3d;hp=01bdb0ec2641a66d162e3aedba11cd16b225dada;hpb=f3b5161e466df2a94f2704177f0173e7d940c4d5;p=dbsrgits%2FDBIx-Class-DeploymentHandler.git diff --git a/t/version_storages/standard.t b/t/version_storages/standard.t index 01bdb0e..2d049a5 100644 --- a/t/version_storages/standard.t +++ b/t/version_storages/standard.t @@ -10,12 +10,13 @@ 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 = 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 +26,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,