X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=maint%2FMakefile.PL.inc%2F11_authortests.pl;h=7760de2efa21b9e554bd2c4ecedec06a304070d9;hb=c26b30dee587fa008f7d956b61ae27c36ac7ec82;hp=442b67243b6d621ad262ab1dab7624cd90352f09;hpb=a2bd379666d729133d65c85dc775627937084b18;p=dbsrgits%2FDBIx-Class.git diff --git a/maint/Makefile.PL.inc/11_authortests.pl b/maint/Makefile.PL.inc/11_authortests.pl index 442b672..7760de2 100644 --- a/maint/Makefile.PL.inc/11_authortests.pl +++ b/maint/Makefile.PL.inc/11_authortests.pl @@ -1,18 +1,15 @@ require File::Spec; require File::Find; -my $xt_dirs; +my $xt_dist_dirs; File::Find::find(sub { - return if $xt_dirs->{$File::Find::dir}; - $xt_dirs->{$File::Find::dir} = 1 if ( + return if $xt_dist_dirs->{$File::Find::dir}; + $xt_dist_dirs->{$File::Find::dir} = 1 if ( $_ =~ /\.t$/ and -f $_ ); -}, 'xt'); +}, 'xt/dist'); -my @xt_tests = map { File::Spec->catfile($_, '*.t') } sort keys %$xt_dirs; - -# this will add the xt tests to the `make test` target among other things -Meta->tests(join (' ', map { $_ || () } @xt_tests, Meta->tests ) ); +my @xt_dist_tests = map { File::Spec->catfile($_, '*.t') } sort keys %$xt_dist_dirs; # inject an explicit xt test run, mainly to check the contents of # lib and the generated POD's *before* anything is copied around @@ -38,7 +35,7 @@ test_xt : pm_to_blib ), # test list join( ' ', - map { $mm_proto->quote_literal($_) } @xt_tests + map { $mm_proto->quote_literal($_) } @xt_dist_tests ), ) ]} @@ -55,7 +52,7 @@ dbic_distdir_retest_ws_and_footers : '$(ABSPERLRUN)', map { $mm_proto->quote_literal($_) } qw(-Ilib -e $ENV{RELEASE_TESTING}=1;$ENV{DBICTEST_NO_MAKEFILE_VERIFICATION}=1;) ), - 'xt/whitespace.t xt/footers.t', + 'xt/dist/postdistdir/*.t', ) ) ]}