coercion for database list

[dbsrgits/DBIx-Class-DeploymentHandler.git] / t / 02-instantiation.t

diff --git a/t/02-instantiation.t b/t/02-instantiation.t
index 57e141a..60d5216 100644 (file)
--- a/t/02-instantiation.t
+++ b/t/02-instantiation.t
@@ -19,7 +19,7 @@ VERSION1: {
    my $handler = DBIx::Class::DeploymentHandler->new({
       upgrade_directory => $sql_dir,
       schema => $s,
-      databases => ['SQLite'],
+      databases => 'SQLite',
    });
 
    ok($handler, 'DBIx::Class::DeploymentHandler w/1.0 instantiates correctly');
@@ -48,7 +48,7 @@ VERSION2: {
    my $handler = DBIx::Class::DeploymentHandler->new({
       upgrade_directory => $sql_dir,
       schema => $s,
-      databases => ['SQLite'],
+      databases => 'SQLite',
    });
 
    ok($handler, 'DBIx::Class::DeploymentHandler w/2.0 instantiates correctly');
@@ -87,7 +87,7 @@ VERSION3: {
    my $handler = DBIx::Class::DeploymentHandler->new({
       upgrade_directory => $sql_dir,
       schema => $s,
-      databases => ['SQLite'],
+      databases => 'SQLite',
    });
 
    ok($handler, 'DBIx::Class::DeploymentHandler w/3.0 instantiates correctly');