X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fdeploy_methods%2Fsql_translator_deprecated.t;h=cd2612ccfcb5a21b9c1f1f151e5f4c719cee036d;hb=7b3d00f984e43c319a637332579e950376637a3d;hp=4038abe11034bb6335dcf93f6361442b1e14af52;hpb=be140a5f1f8ab40705bf4cbedb74761c4994a765;p=dbsrgits%2FDBIx-Class-DeploymentHandler.git diff --git a/t/deploy_methods/sql_translator_deprecated.t b/t/deploy_methods/sql_translator_deprecated.t index 4038abe..cd2612c 100644 --- a/t/deploy_methods/sql_translator_deprecated.t +++ b/t/deploy_methods/sql_translator_deprecated.t @@ -8,11 +8,12 @@ use DBICDHTest; use aliased 'DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator::Deprecated'; -use File::Spec::Functions; +use File::Spec::Functions qw(catfile splitdir); +use File::Temp 'tempdir'; -my $db = 'dbi:SQLite:db.db'; -my @connection = ($db, '', '', { ignore_version => 1 }); -my $sql_dir = 't/sql'; +my $dbh = DBICDHTest::dbh(); +my @connection = (sub { $dbh }, { ignore_version => 1 }); +my $sql_dir = tempdir( CLEANUP => 1 ); DBICDHTest::ready; @@ -21,7 +22,7 @@ VERSION1: { my $s = DBICVersion::Schema->connect(@connection); my $dm = Deprecated->new({ schema => $s, - upgrade_directory => $sql_dir, + script_directory => $sql_dir, databases => ['SQLite'], sql_translator_args => { add_drop_table => 0 }, }); @@ -31,7 +32,7 @@ VERSION1: { $dm->prepare_deploy; ok( - -f catfile(qw( t sql DBICVersion-Schema-1.0-SQLite.sql )), + -f catfile(splitdir($sql_dir), qw(DBICVersion-Schema-1.0-SQLite.sql )), '1.0 schema gets generated properly' ); @@ -53,7 +54,7 @@ VERSION2: { my $s = DBICVersion::Schema->connect(@connection); my $dm = Deprecated->new({ schema => $s, - upgrade_directory => $sql_dir, + script_directory => $sql_dir, databases => ['SQLite'], }); @@ -65,9 +66,9 @@ VERSION2: { $version = $s->schema_version; $dm->prepare_deploy; $dm->prepare_upgrade({ - from_version => '1.0', - to_version => $version, - version_set => ['1.0', $version] + from_version => '1.0', + to_version => $version, + version_set => ['1.0', $version] }); dies_ok { $s->resultset('Foo')->create({