Commit | Line | Data |
8273e845 |
1 | package # hide from PAUSE |
637ca936 |
2 | DBICTest::Schema::TwoKeyTreeLike; |
3 | |
4a233f30 |
4 | use warnings; |
5 | use strict; |
6 | |
660cf1be |
7 | use base qw/DBICTest::BaseResult/; |
637ca936 |
8 | |
9 | __PACKAGE__->table('twokeytreelike'); |
10 | __PACKAGE__->add_columns( |
11 | 'id1' => { data_type => 'integer' }, |
12 | 'id2' => { data_type => 'integer' }, |
13 | 'parent1' => { data_type => 'integer' }, |
14 | 'parent2' => { data_type => 'integer' }, |
15 | 'name' => { data_type => 'varchar', |
16 | size => 100, |
17 | }, |
18 | ); |
19 | __PACKAGE__->set_primary_key(qw/id1 id2/); |
7b90bb13 |
20 | __PACKAGE__->add_unique_constraint('tktlnameunique' => ['name']); |
175e2616 |
21 | __PACKAGE__->belongs_to('parent', 'DBICTest::Schema::TwoKeyTreeLike', |
637ca936 |
22 | { 'foreign.id1' => 'self.parent1', 'foreign.id2' => 'self.parent2'}); |
23 | |
24 | 1; |