X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F02-instantiation.t;h=36e8e4fc774c59e8af02aeb3ca1756d230ef7952;hb=91adde755e5808a1ec12bcf00e683e3754964cc9;hp=b302e988e977e3abcfae53e3450cb47f2921baac;hpb=4a65f60b80222596f851950728f0a115f511481c;p=dbsrgits%2FDBIx-Class-DeploymentHandler.git diff --git a/t/02-instantiation.t b/t/02-instantiation.t index b302e98..36e8e4f 100644 --- a/t/02-instantiation.t +++ b/t/02-instantiation.t @@ -24,16 +24,16 @@ VERSION1: { $DBICVersion::Schema::VERSION = 1; ok($s, 'DBICVersion::Schema 1 instantiates correctly'); my $handler = DH->new({ - upgrade_directory => $sql_dir, + script_directory => $sql_dir, schema => $s, databases => 'SQLite', - sqltargs => { add_drop_table => 0 }, + sql_translator_args => { add_drop_table => 0 }, }); ok($handler, 'DBIx::Class::DeploymentHandler w/1 instantiates correctly'); my $version = $s->schema_version; - $handler->prepare_install; + $handler->prepare_deploy; dies_ok { $s->resultset('Foo')->create({ @@ -57,7 +57,7 @@ VERSION2: { $DBICVersion::Schema::VERSION = 2; ok($s, 'DBICVersion::Schema 2 instantiates correctly'); my $handler = DH->new({ - upgrade_directory => $sql_dir, + script_directory => $sql_dir, schema => $s, databases => 'SQLite', }); @@ -65,8 +65,8 @@ VERSION2: { ok($handler, 'DBIx::Class::DeploymentHandler w/2 instantiates correctly'); my $version = $s->schema_version(); - $handler->prepare_install(); - $handler->prepare_upgrade(1, $version); + $handler->prepare_deploy(); + $handler->prepare_upgrade({ from_version => 1, to_version => $version} ); dies_ok { $s->resultset('Foo')->create({ bar => 'frew', @@ -94,7 +94,7 @@ VERSION3: { $DBICVersion::Schema::VERSION = 3; ok($s, 'DBICVersion::Schema 3 instantiates correctly'); my $handler = DH->new({ - upgrade_directory => $sql_dir, + script_directory => $sql_dir, schema => $s, databases => 'SQLite', }); @@ -102,8 +102,8 @@ VERSION3: { ok($handler, 'DBIx::Class::DeploymentHandler w/3 instantiates correctly'); my $version = $s->schema_version(); - $handler->prepare_install; - $handler->prepare_upgrade( 2, $version ); + $handler->prepare_deploy; + $handler->prepare_upgrade({ from_version => 2, to_version => $version }); dies_ok { $s->resultset('Foo')->create({ bar => 'frew', @@ -127,7 +127,7 @@ DOWN2: { $DBICVersion::Schema::VERSION = 2; ok($s, 'DBICVersion::Schema 2 instantiates correctly'); my $handler = DH->new({ - upgrade_directory => $sql_dir, + script_directory => $sql_dir, schema => $s, databases => 'SQLite', }); @@ -135,7 +135,7 @@ DOWN2: { ok($handler, 'DBIx::Class::DeploymentHandler w/2 instantiates correctly'); my $version = $s->schema_version(); - $handler->prepare_downgrade(3, $version); + $handler->prepare_downgrade({ from_version => 3, to_version => $version }); lives_ok { $s->resultset('Foo')->create({ bar => 'frew',