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

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

diff --git a/examples/Schema/MyDatabase/Main/Result/Track.pm b/examples/Schema/MyDatabase/Main/Result/Track.pm
index 23877bb..961018b 100644 (file)
--- a/examples/Schema/MyDatabase/Main/Result/Track.pm
+++ b/examples/Schema/MyDatabase/Main/Result/Track.pm
@@ -1,9 +1,16 @@
 package MyDatabase::Main::Result::Track;
-use base qw/DBIx::Class/;
-__PACKAGE__->load_components(qw/PK::Auto Core/);
+
+use warnings;
+use strict;
+
+use base qw/DBIx::Class::Core/;
+
 __PACKAGE__->table('track');
+
 __PACKAGE__->add_columns(qw/ trackid cd title/);
+
 __PACKAGE__->set_primary_key('trackid');
+
 __PACKAGE__->belongs_to('cd' => 'MyDatabase::Main::Result::Cd');
 
 1;