X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F03-deprecated.t;h=96d2d6dc770405ed987c60adead6c3ae4e8f5b50;hb=migration_schema;hp=9b83045e581f1f3854b8ed9c62767deb24911020;hpb=be140a5f1f8ab40705bf4cbedb74761c4994a765;p=dbsrgits%2FDBIx-Class-DeploymentHandler.git diff --git a/t/03-deprecated.t b/t/03-deprecated.t index 9b83045..96d2d6d 100644 --- a/t/03-deprecated.t +++ b/t/03-deprecated.t @@ -13,17 +13,17 @@ use Test::Exception; DBICDHTest::ready; -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'; VERSION1: { use_ok 'DBICVersion_v1'; - my $s = DBICVersion::Schema->connect(@connection); + my $s = DBICVersion::Schema1->connect(@connection); is $s->schema_version, '1.0', 'schema version is at 1.0'; ok($s, 'DBICVersion::Schema 1.0 instantiates correctly'); my $handler = Deprecated->new({ - upgrade_directory => $sql_dir, + script_directory => $sql_dir, schema => $s, databases => 'SQLite', sql_translator_args => { add_drop_table => 0 }, @@ -52,11 +52,11 @@ VERSION1: { VERSION2: { use_ok 'DBICVersion_v2'; - my $s = DBICVersion::Schema->connect(@connection); + my $s = DBICVersion::Schema2->connect(@connection); is $s->schema_version, '2.0', 'schema version is at 2.0'; ok($s, 'DBICVersion::Schema 2.0 instantiates correctly'); my $handler = Deprecated->new({ - upgrade_directory => $sql_dir, + script_directory => $sql_dir, schema => $s, databases => 'SQLite', }); @@ -89,11 +89,11 @@ VERSION2: { VERSION3: { use_ok 'DBICVersion_v3'; - my $s = DBICVersion::Schema->connect(@connection); + my $s = DBICVersion::Schema3->connect(@connection); is $s->schema_version, '3.0', 'schema version is at 3.0'; ok($s, 'DBICVersion::Schema 3.0 instantiates correctly'); my $handler = Deprecated->new({ - upgrade_directory => $sql_dir, + script_directory => $sql_dir, schema => $s, databases => 'SQLite', });