X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F74mssql.t;h=0bb43b60de778b065fc2a5c92c63c6d2ccdb30eb;hb=6c0ddbf737fa59fd988b0ca3bdbd0e68d2ef9e6d;hp=8061ba1d0c38c75aaf5234afb25d3ad19d034041;hpb=3885cff6485aba6a4708efb7f98877bc8e5d4369;p=dbsrgits%2FDBIx-Class-Historic.git

diff --git a/t/74mssql.t b/t/74mssql.t
index 8061ba1..0bb43b6 100644
--- a/t/74mssql.t
+++ b/t/74mssql.t
@@ -14,8 +14,12 @@ plan skip_all => 'Set $ENV{DBICTEST_MSSQL_DSN}, _USER and _PASS to run this test
 
 plan tests => 4;
 
-DBICTest::Schema->storage_type('::DBI::MSSQL');
-DBICTest::Schema->compose_connection( 'MSSQLTest' => $dsn, $user, $pass );
+my $storage_type = '::DBI::MSSQL';
+$storage_type = '::DBI::Sybase::MSSQL' if $dsn =~ /^dbi:Sybase:/;
+# Add more for others in the future when they exist (ODBC? ADO? JDBC?)
+
+DBICTest::Schema->storage_type($storage_type);
+DBICTest::Schema->compose_namespace( 'MSSQLTest' => $dsn, $user, $pass );
 
 my $dbh = MSSQLTest->schema->storage->dbh;