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( | |
13 | id => { data_type => 'integer', is_auto_increment => 1 }, | |
14 | a => { data_type => 'text' } | |
15 | ); | |
16 | ||
17 | __PACKAGE__->set_primary_key('id'); | |
18 | ||
19 | 1; |