t/lib/NoSequenceSalad.pm

   1 package NoSequenceSalad;
   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;