I hate you all.

[dbsrgits/DBIx-Class.git] / lib / DBIx / Class / Core.pm

diff --git a/lib/DBIx/Class/Core.pm b/lib/DBIx/Class/Core.pm
index 4a3cf36..7c48181 100644 (file)
--- a/lib/DBIx/Class/Core.pm
+++ b/lib/DBIx/Class/Core.pm
@@ -2,35 +2,64 @@ package DBIx::Class::Core;
 
 use strict;
 use warnings;
+no warnings 'qw';
 
-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/
+  Serialize::Storable
+  Relationship
+  InflateColumn
+  PK::Auto
+  PK
+  Row
+  ResultSourceProxy::Table
+  AccessorGroup/);
 
 1;
 
-=head1 NAME 
+=head1 NAME
+
+DBIx::Class::Core - Core set of DBIx::Class modules
 
-DBIx::Class::Core - Core set of DBIx::Class modules.
+=head1 SYNOPSIS
+
+  # In your table classes
+  __PACKAGE__->load_components(qw/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::Serialize::Storable>
+
+=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>
+
+=item L<DBIx::Class::AccessorGroup>
+
+=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
-