projects
/
dbsrgits/DBIx-Class-ResultSource-MultipleTableInheritance.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
4449f6e0e4326e1621e3675192ef5275c74bf409
[dbsrgits/DBIx-Class-ResultSource-MultipleTableInheritance.git]
/
t
/
lib
/
Cafe.pm
1
package Cafe;
2
3
use strict;
4
use warnings;
5
use parent 'DBIx::Class::Schema';
6
use aliased 'DBIx::Class::ResultSource::MultipleTableInheritance' => 'MTIView';
7
8
for my $p (__PACKAGE__) {
9
$p->load_namespaces;
10
$_->attach_additional_sources
11
for grep $_->isa(MTIView), map $p->source($_), $p->sources;
12
}
13
14
1;