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