t/lib/DBICTest/Schema/CD.pm

   1 package DBICTest::Schema::CD;
   2
   3 use base 'DBIx::Class::Core';
   4
   5 DBICTest::Schema::CD->table('cd');
   6 DBICTest::Schema::CD->add_columns(
   7   'cdid' => {
   8     data_type => 'integer',
   9     is_auto_increment => 1,
  10   },
  11   'artist' => {
  12     data_type => 'integer',
  13   },
  14   'title' => {
  15     data_type => 'varchar',
  16   },
  17   'year' => {
  18     data_type => 'varchar',
  19   },
  20 );
  21 DBICTest::Schema::CD->set_primary_key('cdid');
  22 DBICTest::Schema::CD->add_unique_constraint(artist_title => [ qw/artist title/ ]);
  23
  24 1;