Commit | Line | Data |
---|---|---|
4eaa25b5 | 1 | package LoadTest::Result::Bar; |
7abe3af2 | 2 | |
3 | use strict; | |
4 | use warnings; | |
4eaa25b5 | 5 | use parent qw(LoadTest::Result::Foo); |
7abe3af2 | 6 | |
4eaa25b5 | 7 | require LoadTest::Result::Mixin; |
8b229aa6 | 8 | |
7abe3af2 | 9 | __PACKAGE__->table('bar'); |
10 | ||
8b229aa6 | 11 | __PACKAGE__->result_source_instance->add_additional_parent( |
4eaa25b5 | 12 | LoadTest::Result::Mixin->result_source_instance |
6ce50415 | 13 | ); |
8b229aa6 | 14 | |
6ce50415 | 15 | __PACKAGE__->add_columns( |
16 | b => { data_type => 'integer' } | |
17 | ); | |
7abe3af2 | 18 | |
6ce50415 | 19 | __PACKAGE__->belongs_to( |
20 | 'b_thang', | |
4eaa25b5 | 21 | 'LoadTest::Result::JustATable', |
6ce50415 | 22 | { 'foreign.id' => 'self.b' }, |
490d5481 | 23 | ); |
24 | ||
6ce50415 | 25 | __PACKAGE__->has_many( |
26 | 'foos', | |
4eaa25b5 | 27 | 'LoadTest::Result::Foo', |
6ce50415 | 28 | { 'foreign.a' => 'self.id' } |
29 | ); | |
490d5481 | 30 | |
7abe3af2 | 31 | 1; |