Update example Result classes for proper DDL generation

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

diff --git a/examples/Schema/MyApp/Schema/Result/Track.pm b/examples/Schema/MyApp/Schema/Result/Track.pm
index 91b8368..dc0951a 100644 (file)
--- a/examples/Schema/MyApp/Schema/Result/Track.pm
+++ b/examples/Schema/MyApp/Schema/Result/Track.pm
@@ -3,14 +3,27 @@ package MyApp::Schema::Result::Track;
 use warnings;
 use strict;
 
-use base qw/DBIx::Class::Core/;
+use base qw( DBIx::Class::Core );
 
 __PACKAGE__->table('track');
 
-__PACKAGE__->add_columns(qw/ trackid cd title/);
+__PACKAGE__->add_columns(
+  trackid => {
+    data_type => 'integer',
+    is_auto_increment => 1
+  },
+  cd => {
+    data_type => 'integer',
+  },
+  title => {
+    data_type => 'text',
+  },
+);
 
 __PACKAGE__->set_primary_key('trackid');
 
+__PACKAGE__->add_unique_constraint([qw( title cd )]);
+
 __PACKAGE__->belongs_to('cd' => 'MyApp::Schema::Result::Cd');
 
 1;