It's almost 2010 - load_components ('Core') is like ewwww

[dbsrgits/DBIx-Class.git] / examples / Schema / MyDatabase / Main / Result / Cd.pm

diff --git a/examples/Schema/MyDatabase/Main/Result/Cd.pm b/examples/Schema/MyDatabase/Main/Result/Cd.pm
index 83fd21e..6a465a1 100644 (file)
--- a/examples/Schema/MyDatabase/Main/Result/Cd.pm
+++ b/examples/Schema/MyDatabase/Main/Result/Cd.pm
@@ -1,9 +1,16 @@
 package MyDatabase::Main::Result::Cd;
-use base qw/DBIx::Class/;
-__PACKAGE__->load_components(qw/PK::Auto Core/);
+
+use warnings;
+use strict;
+
+use base qw/DBIx::Class::Core/;
+
 __PACKAGE__->table('cd');
+
 __PACKAGE__->add_columns(qw/ cdid artist title/);
+
 __PACKAGE__->set_primary_key('cdid');
+
 __PACKAGE__->belongs_to('artist' => 'MyDatabase::Main::Result::Artist');
 __PACKAGE__->has_many('tracks' => 'MyDatabase::Main::Result::Track');