X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F02-instantiation-no-ddl.t;h=b892f2c1666b105ba61f396345ce7cfdb7dfb63d;hb=88fecddb0e689b3ecdbefdf9ba4912ad301ba357;hp=66fcc4429b7418f70d2e3434ed4e0524b3501d54;hpb=5761fe02e68a534a47a6a5ff905c73ec991703cd;p=dbsrgits%2FDBIx-Class-DeploymentHandler.git diff --git a/t/02-instantiation-no-ddl.t b/t/02-instantiation-no-ddl.t index 66fcc44..b892f2c 100644 --- a/t/02-instantiation-no-ddl.t +++ b/t/02-instantiation-no-ddl.t @@ -11,11 +11,12 @@ use aliased 'DBIx::Class::DeploymentHandler', 'DH'; use File::Path 'remove_tree'; use Test::More; use Test::Exception; +use DBI; 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: { @@ -158,6 +159,10 @@ DOWN2: { baz => 'frew', }) } 'schema is at version 2'; + + is $handler->version_storage->database_version => 2, + 'database version is down to 2'; + } done_testing;