Commit | Line | Data |
7abe3af2 |
1 | package MTITest::Result::Foo; |
2 | |
3 | use strict; |
4 | use warnings; |
5 | use parent qw(DBIx::Class::Core); |
6 | use aliased 'DBIx::Class::ResultSource::MultipleTableInheritance'; |
7 | |
8 | __PACKAGE__->table_class(MultipleTableInheritance); |
9 | |
10 | __PACKAGE__->table('foo'); |
11 | |
12 | __PACKAGE__->add_columns( |
6ce50415 |
13 | id => { data_type => 'integer', is_auto_increment => 1 }, |
14 | a => { data_type => 'integer', is_nullable => 1 } |
7abe3af2 |
15 | ); |
16 | |
17 | __PACKAGE__->set_primary_key('id'); |
18 | |
6ce50415 |
19 | __PACKAGE__->belongs_to( |
20 | 'bar', |
21 | 'MTITest::Result::Bar', |
22 | { 'foreign.id' => 'self.a' } |
23 | ); |
490d5481 |
24 | |
7abe3af2 |
25 | 1; |