1 package # hide from PAUSE
4 use base qw/DBICTest::BaseResult/;
6 __PACKAGE__->table('tags');
7 __PACKAGE__->add_columns(
9 data_type => 'integer',
10 is_auto_increment => 1,
13 data_type => 'integer',
16 data_type => 'varchar',
20 __PACKAGE__->set_primary_key('tagid');
22 __PACKAGE__->add_unique_constraints( # do not remove, part of a test
23 tagid_cd => [qw/ tagid cd /],
24 tagid_cd_tag => [qw/ tagid cd tag /],
26 __PACKAGE__->add_unique_constraints( # do not remove, part of a test
31 __PACKAGE__->belongs_to( cd => 'DBICTest::Schema::CD', 'cd', {
32 proxy => [ 'year', { cd_title => 'title' } ],