use DBIx::Class::Carp;
my @modules = grep {
- my $mod = $_;
+ my ($mod) = $_ =~ /(.+)/;
# not all modules are loadable at all times
do {
# this subclass is expected to inherit whatever crap comes
# from the parent
'DBIx::Class::ResultSet::Pager',
-
- # this is not part of the inheritance tree (plus is a temporary fix anyway)
- 'DBIx::Class::GlobalDestruction',
-
- # Moo does not name its generated methods, fix pending
- 'DBIx::Class::Storage::BlockRunner',
) };
my $has_cmop = eval { require Class::MOP };