X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F04-preconnect.t;fp=t%2F04-preconnect.t;h=962b89f2c3dae73fbf9b3cfe5095504798d47d5b;hb=7b3d00f984e43c319a637332579e950376637a3d;hp=9d9cded85558111e4d44f6b6eaca38994d13b4d7;hpb=562030878a850a01073774f27769748077c79176;p=dbsrgits%2FDBIx-Class-DeploymentHandler.git diff --git a/t/04-preconnect.t b/t/04-preconnect.t index 9d9cded..962b89f 100644 --- a/t/04-preconnect.t +++ b/t/04-preconnect.t @@ -10,13 +10,12 @@ use aliased 'DBIx::Class::DeploymentHandler', 'DH'; use File::Path qw(remove_tree mkpath); use Test::More; +use File::Temp 'tempdir'; use Test::Exception; -DBICDHTest::ready; - my $db = 'dbi:SQLite::memory:'; my @connection = ($db, '', '', { ignore_version => 1, on_connect_do => sub { die }}); -my $sql_dir = 't/sql'; +my $sql_dir = tempdir( CLEANUP => 1 ); VERSION1: { use_ok 'DBICVersion_v1'; @@ -33,7 +32,7 @@ VERSION1: { ok !$s->storage->connected, 'creating handler did not connect'; ok($handler, 'DBIx::Class::DeploymentHandler w/1 instantiates correctly'); - mkpath('t/sql/SQLite/initialize/1'); + mkpath("$sql_dir/SQLite/initialize/1"); $handler->initialize({ version => 1, storage_type => 'SQLite' }); ok !$s->storage->connected, 'creating schema did not connect'; }