X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FSchema%2FLoader%2FDBI%2FSybase%2FMicrosoft_SQL_Server.pm;h=81f7f731b52f1fd7ae546749dc23b7206ea14339;hb=46564a42215c5309753f3e0609ae1adddf68d083;hp=b4f620bb554ebc5be9b9793887e449b6ba802305;hpb=9cc8e7e177103e568c99f968ff848d25e6c3bea8;p=dbsrgits%2FDBIx-Class-Schema-Loader.git diff --git a/lib/DBIx/Class/Schema/Loader/DBI/Sybase/Microsoft_SQL_Server.pm b/lib/DBIx/Class/Schema/Loader/DBI/Sybase/Microsoft_SQL_Server.pm index b4f620b..81f7f73 100644 --- a/lib/DBIx/Class/Schema/Loader/DBI/Sybase/Microsoft_SQL_Server.pm +++ b/lib/DBIx/Class/Schema/Loader/DBI/Sybase/Microsoft_SQL_Server.pm @@ -3,46 +3,32 @@ package DBIx::Class::Schema::Loader::DBI::Sybase::Microsoft_SQL_Server; use strict; use warnings; use base 'DBIx::Class::Schema::Loader::DBI::MSSQL'; -use Carp::Clan qw/^DBIx::Class/; -use Class::C3; +use mro 'c3'; -our $VERSION = '0.04999_12'; +our $VERSION = '0.07048_01'; =head1 NAME -DBIx::Class::Schema::Loader::DBI::Sybase::Microsoft_SQL_Server - Subclass for -using MSSQL through DBD::Sybase +DBIx::Class::Schema::Loader::DBI::Sybase::Microsoft_SQL_Server - Driver for +using Microsoft SQL Server through DBD::Sybase =head1 DESCRIPTION -See L. - Subclasses L. -=cut - -# Returns an array of table names -sub _tables_list { - my $self = shift; - - my ($table, $type) = @_ ? @_ : ('%', '%'); - - my $dbh = $self->schema->storage->dbh; - my @tables = $dbh->tables(undef, $self->db_schema, $table, $type); - - return @tables; -} +See L and L. =head1 SEE ALSO -L, L, +L, +L, L L, L, -=head1 AUTHOR +=head1 AUTHORS -See L and L. +See L. =head1 LICENSE