1package # hide from PAUSE 2 DBICTest::Schema::LinerNotes; 3 4use 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 211; 22