lib/DBIx/Class/Storage/DBI/Sybase/MSSQL.pm

   1 package DBIx::Class::Storage::DBI::Sybase::MSSQL;
   2
   3 use strict;
   4 use warnings;
   5
   6 use Carp::Clan qw/^DBIx::Class/;
   7
   8 carp 'Setting of storage_type is redundant as connections through DBD::Sybase'
   9     .' are now properly recognized and reblessed into the appropriate subclass'
  10     .' (DBIx::Class::Storage::DBI::Sybase::Microsoft_SQL_Server in the'
  11     .' case of MSSQL). Please remove the explicit call to'
  12     .q/ $schema->storage_type('::DBI::Sybase::MSSQL')/
  13     .', as this storage class has been deprecated in favor of the autodetected'
  14     .' ::DBI::Sybase::Microsoft_SQL_Server';
  15
  16
  17 use base qw/DBIx::Class::Storage::DBI::ODBC::Microsoft_SQL_Server DBIx::Class::Storage::DBI::Sybase/;
  18
  19 1;
  20
  21 =head1 NAME
  22
  23 DBIx::Class::Storage::DBI::Sybase::MSSQL - (DEPRECATED) Legacy storage class for MSSQL via DBD::Sybase
  24
  25 =head1 NOTE
  26
  27 Connections through DBD::Sybase are now correctly recognized and reblessed
  28 into the appropriate subclass (L<DBIx::Class::Storage::DBI::Sybase::Microsoft_SQL_Server>
  29 in the case of MSSQL). Please remove the explicit storage_type setting from your
  30 schema.
  31
  32 =head1 SYNOPSIS
  33
  34 This subclass supports MSSQL connected via L<DBD::Sybase>.
  35
  36   $schema->storage_type('::DBI::Sybase::MSSQL');
  37   $schema->connect_info('dbi:Sybase:....', ...);
  38
  39 =head1 BUGS
  40
  41 Currently, this doesn't work right unless you call C<Class::C3::reinitialize()>
  42 after connecting.
  43
  44 =head1 AUTHORS
  45
  46 Brandon L Black <blblack@gmail.com>
  47
  48 Justin Hunter <justin.d.hunter@gmail.com>
  49
  50 =head1 LICENSE
  51
  52 You may distribute this code under the same terms as Perl itself.
  53
  54 =cut