X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FResultSource%2FTable.pm;h=ac7d3088692f4b26eff83738cf756ccced40ce7f;hb=65abdb85797eb31514fa88ba5ae7ad6f7208c457;hp=4837e79857a94430efb62e5895f0c5bada015a93;hpb=151fc9ada09a73f9bcabe8cef88c4e4ae32b249b;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/lib/DBIx/Class/ResultSource/Table.pm b/lib/DBIx/Class/ResultSource/Table.pm index 4837e79..ac7d308 100644 --- a/lib/DBIx/Class/ResultSource/Table.pm +++ b/lib/DBIx/Class/ResultSource/Table.pm @@ -5,23 +5,18 @@ use warnings; use DBIx::Class::ResultSet; -use Carp qw/croak/; - use base qw/DBIx::Class/; -__PACKAGE__->load_components(qw/ResultSource AccessorGroup/); - -__PACKAGE__->mk_group_accessors('simple' => - qw/_columns _primaries name resultset_class result_class schema/); +__PACKAGE__->load_components(qw/ResultSource/); -=head1 NAME +=head1 NAME -DBIx::Class::Table - Table object +DBIx::Class::ResultSource::Table - Table object =head1 SYNOPSIS =head1 DESCRIPTION -Table object that inherits from L +Table object that inherits from L. =head1 METHODS @@ -33,15 +28,17 @@ Returns the FROM entry for the table (i.e. the table name) sub from { shift->name; } -1; +=head1 FURTHER QUESTIONS? -=head1 AUTHORS +Check the list of L. -Matt S. Trout +=head1 COPYRIGHT AND LICENSE -=head1 LICENSE - -You may distribute this code under the same terms as Perl itself. +This module is free software L +by the L. You can +redistribute it and/or modify it under the same terms as the +L. =cut +1;