Commit | Line | Data |
81092e2d |
1 | package DBIx::Class::Storage::DBI::Sybase::MSSQL; |
2 | |
3 | use strict; |
4 | use warnings; |
5 | |
89999ef2 |
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::Sybase::Microsoft_SQL_Server/; |
81092e2d |
18 | |
19 | 1; |
20 | |
21 | =head1 NAME |
22 | |
89999ef2 |
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. |
81092e2d |
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 | |
35201834 |
39 | =head1 BUGS |
40 | |
41 | Currently, this doesn't work right unless you call C<Class::C3::reinitialize()> |
42 | after connecting. |
43 | |
81092e2d |
44 | =head1 AUTHORS |
45 | |
46 | Brandon L Black <blblack@gmail.com> |
47 | |
47d9646a |
48 | Justin Hunter <justin.d.hunter@gmail.com> |
49 | |
81092e2d |
50 | =head1 LICENSE |
51 | |
52 | You may distribute this code under the same terms as Perl itself. |
53 | |
54 | =cut |