Commit | Line | Data |
---|---|---|
4eaa25b5 | 1 | package LoadTest; |
7abe3af2 | 2 | |
3 | use strict; | |
4 | use warnings; | |
5 | use parent qw(DBIx::Class::Schema); | |
c73d582b | 6 | use aliased 'DBIx::Class::ResultSource::MultipleTableInheritance' => 'MTIView'; |
7abe3af2 | 7 | |
c73d582b | 8 | for my $p (__PACKAGE__) { |
9 | $p->load_namespaces; | |
10 | $_->attach_additional_sources | |
11 | for grep $_->isa(MTIView), map $p->source($_), $p->sources; | |
12 | } | |
7abe3af2 | 13 | |
14 | 1; |