Commit | Line | Data |
---|---|---|
731e8b3e | 1 | package MyApp2::Schema::Result::CD; |
2 | use base qw/DBIx::Class::Core/; | |
3 | ||
4 | __PACKAGE__->load_components(qw/InflateColumn::DateTime/); | |
5 | __PACKAGE__->table('cd'); | |
6 | __PACKAGE__->add_columns(qw/ cdid artistid title year /); | |
7 | __PACKAGE__->set_primary_key('cdid'); | |
8 | __PACKAGE__->belongs_to(artist => 'MyApp2::Schema::Result::Artist', 'artistid'); | |
9 | ||
10 | 1; |