Improve the populate docs in ::Schema and ::ResultSet
[dbsrgits/DBIx-Class.git] / maint / Makefile.PL.inc / 11_authortests.pl
1 require File::Spec;
2 require File::Find;
3
4 my $xt_dirs;
5 File::Find::find(sub {
6   return if $xt_dirs->{$File::Find::dir};
7   $xt_dirs->{$File::Find::dir} = 1 if (
8     $_ =~ /\.t$/ and -f $_
9   );
10 }, 'xt');
11
12 my $xt_tests = join (' ', map { File::Spec->catfile($_, '*.t') } sort keys %$xt_dirs );
13
14 # this will add the xt tests to the `make test` target among other things
15 Meta->tests(join (' ', map { $_ || () } Meta->tests, $xt_tests ) );
16
17 # inject an explicit xt test run for the create_distdir target
18 postamble <<"EOP";
19
20 create_distdir : test_xt
21
22 test_xt :
23 \tPERL_DL_NONLAZY=1 RELEASE_TESTING=1 \$(FULLPERLRUN) "-MExtUtils::Command::MM" "-e" "test_harness(\$(TEST_VERBOSE), 'inc', '\$(INST_LIB)', '\$(INST_ARCHLIB)')" $xt_tests
24
25 EOP
26
27
28 # keep the Makefile.PL eval happy
29 1;