use strict;
use warnings;
-use base qw/DBIx::Class::Relationship
- DBIx::Class::SQL::OrderBy
- DBIx::Class::SQL::Abstract
- DBIx::Class::PK
- DBIx::Class::Table
- DBIx::Class::SQL
- DBIx::Class::DB
- DBIx::Class::AccessorGroup/;
+use base qw/DBIx::Class/;
+
+__PACKAGE__->load_components(qw/
+ Relationship
+ InflateColumn
+ PK::Auto
+ PK
+ Row
+ ResultSourceProxy::Table
+/);
1;
-=head1 NAME
+=head1 NAME
+
+DBIx::Class::Core - Core set of DBIx::Class modules
+
+=head1 SYNOPSIS
-DBIx::Class::Core - Core set of DBIx::Class modules.
+ # In your result (table) classes
+ use base 'DBIx::Class::Core';
=head1 DESCRIPTION
-This class just inherits from the various modules that makes
-up the Class::DBI core features.
+This class just inherits from the various modules that make up the
+L<DBIx::Class> core features. You almost certainly want these.
+
+The core modules currently are:
+
+=over 4
+
+=item L<DBIx::Class::InflateColumn>
+=item L<DBIx::Class::Relationship>
+
+=item L<DBIx::Class::PK::Auto>
+
+=item L<DBIx::Class::PK>
+
+=item L<DBIx::Class::Row>
+
+=item L<DBIx::Class::ResultSourceProxy::Table>
+
+=back
=head1 AUTHORS
-Matt S. Trout <perl-stuff@trout.me.uk>
+Matt S. Trout <mst@shadowcatsystems.co.uk>
=head1 LICENSE
You may distribute this code under the same terms as Perl itself.
=cut
-