X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F74mssql.t;h=204a640c10cde0698e764293d4926695791730e9;hb=ad5d0ee95a0b857e14c822818c3fe6059d022c40;hp=8061ba1d0c38c75aaf5234afb25d3ad19d034041;hpb=3885cff6485aba6a4708efb7f98877bc8e5d4369;p=dbsrgits%2FDBIx-Class.git diff --git a/t/74mssql.t b/t/74mssql.t index 8061ba1..204a640 100644 --- a/t/74mssql.t +++ b/t/74mssql.t @@ -14,7 +14,11 @@ plan skip_all => 'Set $ENV{DBICTEST_MSSQL_DSN}, _USER and _PASS to run this test plan tests => 4; -DBICTest::Schema->storage_type('::DBI::MSSQL'); +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_connection( 'MSSQLTest' => $dsn, $user, $pass ); my $dbh = MSSQLTest->schema->storage->dbh;