X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fdeploy_methods%2Fsql_translator_deprecated.t;h=768b514db23e18d299e0fb71a5c3a77feb0c897f;hb=migration_schema;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..768b514 100644 --- a/t/deploy_methods/sql_translator_deprecated.t +++ b/t/deploy_methods/sql_translator_deprecated.t @@ -10,18 +10,18 @@ use aliased use File::Spec::Functions; -my $db = 'dbi:SQLite:db.db'; -my @connection = ($db, '', '', { ignore_version => 1 }); +my $dbh = DBICDHTest::dbh(); +my @connection = (sub { $dbh }, { ignore_version => 1 }); my $sql_dir = 't/sql'; DBICDHTest::ready; VERSION1: { use_ok 'DBICVersion_v1'; - my $s = DBICVersion::Schema->connect(@connection); + my $s = DBICVersion::Schema1->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 +31,7 @@ VERSION1: { $dm->prepare_deploy; ok( - -f catfile(qw( t sql DBICVersion-Schema-1.0-SQLite.sql )), + -f catfile(qw( t sql DBICVersion-Schema1-1.0-SQLite.sql )), '1.0 schema gets generated properly' ); @@ -50,10 +50,10 @@ VERSION1: { VERSION2: { use_ok 'DBICVersion_v2'; - my $s = DBICVersion::Schema->connect(@connection); + my $s = DBICVersion::Schema2->connect(@connection); my $dm = Deprecated->new({ schema => $s, - upgrade_directory => $sql_dir, + script_directory => $sql_dir, databases => ['SQLite'], }); @@ -65,9 +65,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({