X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=examples%2FSchema%2FMyDatabase%2FMain%2FResult%2FTrack.pm;fp=examples%2FSchema%2FMyDatabase%2FMain%2FResult%2FTrack.pm;h=961018b9a29f0aae98833ca4132bebb372d41a13;hb=d88ecca6486a2b1c4b6e2f0440165b186aab39bc;hp=23877bbc2b3da09c980b46c71a6f7829db9dfccf;hpb=237e9af389b2342587971cb8be5d56fb2bc4c355;p=dbsrgits%2FDBIx-Class.git

diff --git a/examples/Schema/MyDatabase/Main/Result/Track.pm b/examples/Schema/MyDatabase/Main/Result/Track.pm
index 23877bb..961018b 100644
--- 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;