Commit | Line | Data |
81092e2d |
1 | package DBIx::Class::Storage::DBI::Sybase::MSSQL; |
2 | |
3 | use strict; |
4 | use warnings; |
5 | |
9c541170 |
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 | |
eb0323df |
17 | use base qw/DBIx::Class::Storage::DBI::Sybase::Microsoft_SQL_Server/; |
2ad62d97 |
18 | use mro 'c3'; |
81092e2d |
19 | |
20 | 1; |
21 | |
22 | =head1 NAME |
23 | |
9c541170 |
24 | DBIx::Class::Storage::DBI::Sybase::MSSQL - (DEPRECATED) Legacy storage class for MSSQL via DBD::Sybase |
25 | |
26 | =head1 NOTE |
27 | |
28 | Connections through DBD::Sybase are now correctly recognized and reblessed |
29 | into the appropriate subclass (L<DBIx::Class::Storage::DBI::Sybase::Microsoft_SQL_Server> |
30 | in the case of MSSQL). Please remove the explicit storage_type setting from your |
31 | schema. |
81092e2d |
32 | |
33 | =head1 SYNOPSIS |
34 | |
35 | This subclass supports MSSQL connected via L<DBD::Sybase>. |
36 | |
37 | $schema->storage_type('::DBI::Sybase::MSSQL'); |
38 | $schema->connect_info('dbi:Sybase:....', ...); |
39 | |
35201834 |
40 | =head1 BUGS |
41 | |
42 | Currently, this doesn't work right unless you call C<Class::C3::reinitialize()> |
43 | after connecting. |
44 | |
81092e2d |
45 | =head1 AUTHORS |
46 | |
47 | Brandon L Black <blblack@gmail.com> |
48 | |
47d9646a |
49 | Justin Hunter <justin.d.hunter@gmail.com> |
50 | |
81092e2d |
51 | =head1 LICENSE |
52 | |
53 | You may distribute this code under the same terms as Perl itself. |
54 | |
55 | =cut |