Commit | Line | Data |
---|---|---|
b974984a | 1 | package # hide from PAUSE |
2 | DBICTest::Schema::LinerNotes; | |
3 | ||
4 | use base qw/DBICTest::BaseResult/; | |
5 | ||
6 | __PACKAGE__->table('liner_notes'); | |
7 | __PACKAGE__->add_columns( | |
8 | 'liner_id' => { | |
9 | data_type => 'integer', | |
10 | }, | |
11 | 'notes' => { | |
12 | data_type => 'varchar', | |
13 | size => 100, | |
14 | }, | |
15 | ); | |
16 | __PACKAGE__->set_primary_key('liner_id'); | |
17 | __PACKAGE__->belongs_to( | |
18 | 'cd', 'DBICTest::Schema::CD', 'liner_id' | |
19 | ); | |
20 | ||
21 | 1; |