6 return if $xt_dist_dirs->{$File::Find::dir};
7 $xt_dist_dirs->{$File::Find::dir} = 1 if (
12 my @xt_dist_tests = map { File::Spec->catfile($_, '*.t') } sort keys %$xt_dist_dirs;
14 # inject an explicit xt test run, mainly to check the contents of
15 # lib and the generated POD's *before* anything is copied around
17 # at the end rerun the whitespace and footer tests in the distdir
18 # to make sure everything is pristine
21 dbic_clonedir_copy_generated_pod : test_xt
25 # When xt tests are explicitly requested, we want to run with RELEASE_TESTING=1
26 # so that all optdeps are turned into a hard failure
27 # However portably modifying ENV for a single command is surprisingly hard
28 # So instead we (ab)use perl's ability to stack -e options, and simply modify
29 # the ENV from within perl itself
30 $mm_proto->test_via_harness(
34 map { $mm_proto->quote_literal($_) } qw(-e $ENV{RELEASE_TESTING}=1;$ENV{HARNESS_OPTIONS}=j4;)
38 map { $mm_proto->quote_literal($_) } @xt_dist_tests
43 create_distdir : dbic_distdir_retest_ws_and_footers
45 dbic_distdir_retest_ws_and_footers :
49 $mm_proto->test_via_harness(
53 map { $mm_proto->quote_literal($_) } qw(-Ilib -e $ENV{RELEASE_TESTING}=1;$ENV{HARNESS_OPTIONS}=j4;)
55 'xt/dist/postdistdir/*.t',
62 # keep the Makefile.PL eval happy