Commit | Line | Data |
---|---|---|
38fe1ff9 | 1 | package DBICTest::DynamicForeignCols::Computer; |
2 | ||
3 | use warnings; | |
4 | use strict; | |
5 | ||
6 | use base 'DBIx::Class::Core'; | |
7 | ||
8 | __PACKAGE__->table('Computers'); | |
9 | ||
10 | __PACKAGE__->add_columns('id'); | |
11 | ||
12 | __PACKAGE__->set_primary_key('id'); | |
13 | ||
14 | __PACKAGE__->has_many(computer_test_links => 'DBICTest::DynamicForeignCols::TestComputer', 'computer_id'); | |
15 | ||
16 | 1; |