lib/DBIx/Class/ResultSource/Table.pm

   1 package DBIx::Class::ResultSource::Table;
   2
   3 use strict;
   4 use warnings;
   5
   6 use DBIx::Class::ResultSet;
   7
   8 use base qw/DBIx::Class/;
   9 __PACKAGE__->load_components(qw/ResultSource/);
  10
  11 =head1 NAME
  12
  13 DBIx::Class::ResultSource::Table - Table object
  14
  15 =head1 SYNOPSIS
  16
  17 =head1 DESCRIPTION
  18
  19 Table object that inherits from L<DBIx::Class::ResultSource>.
  20
  21 =head1 METHODS
  22
  23 =head2 from
  24
  25 Returns the FROM entry for the table (i.e. the table name)
  26
  27 =cut
  28
  29 sub from { shift->name; }
  30
  31 1;
  32
  33 =head1 AUTHORS
  34
  35 Matt S. Trout <mst@shadowcatsystems.co.uk>
  36
  37 =head1 LICENSE
  38
  39 You may distribute this code under the same terms as Perl itself.
  40
  41 =cut
  42