name 'DBIx-Class';
perl_version '5.008001';
all_from 'lib/DBIx/Class.pm';
+Meta->{values}{x_authority} = 'cpan:RIBASUSHI';
tests_recursive (qw|
t
# FIXME - temporary, needs throwing out for something more efficient
'Data::Compare' => '1.22',
+ # Moo does not yet depend on this higher version
+ 'strictures' => '1.003001',
+
# DBI itself should be capable of installation and execution in pure-perl
# mode. However it has never been tested yet, so consider XS for the time
# being
'Context::Preserve' => '0.01',
'Data::Dumper::Concise' => '2.020',
'Data::Page' => '2.00',
+ 'Devel::GlobalDestruction' => '0',
'Hash::Merge' => '0.12',
- 'Moo' => '0.009013',
+ 'Moo' => '0.009100',
'MRO::Compat' => '0.09',
'Module::Find' => '0.06',
'namespace::clean' => '0.20',
'Path::Class' => '0.18',
'Scope::Guard' => '0.03',
- 'SQL::Abstract' => '1.72',
+ 'SQL::Abstract' => '1.73',
'Try::Tiny' => '0.04',
# dual-life corelibs needing a specific bugfixed version
}
}
-# Bail out on parallel testing
-if (
- ($ENV{HARNESS_OPTIONS}||'') =~ / (?: ^ | \: ) j(\d+) /x
- and
- $1 > 1
-) { die <<EOP }
-
-******************************************************************************
-******************************************************************************
-*** ***
-*** PARALLEL TESTING DETECTED ( \$ENV{HARNESS_OPTIONS} = 'j$1' ) ***
-*** ***
-*** DBIC tests WILL FAIL. It is harder to make them parallel-friendly than ***
-*** it should be (though work is underway). In the meantime you will have ***
-*** to adjust your environment and re-run the installation. Sorry! ***
-*** ***
-******************************************************************************
-******************************************************************************
-
-EOP
-
# this is so we can order requires alphabetically
# copies are needed for potential author requires injection
my $reqs = {
# string-eval, not do(), because we need to provide the
# $reqs and $*_requires lexicals to the included file
# (some includes *do* modify $reqs above)
- for (sort glob ( File::Spec->catfile('maint', 'Makefile.PL.inc', '*') ) ) {
- eval scalar do { local (@ARGV, $/) = $_; <> }
- or die ($@ || $!);
+ for my $inc (sort glob ( File::Spec->catfile('maint', 'Makefile.PL.inc', '*') ) ) {
+ my $src = do { local (@ARGV, $/) = $inc; <> } or die $!;
+ eval "use warnings; use strict; $src" or die sprintf
+ "Failed execution of %s: %s\n",
+ $inc,
+ ($@ || $! || 'Unknown error'),
+ ;
}
}
else {