WriteMakefile(
NAME => 'strictures',
VERSION_FROM => 'lib/strictures.pm',
- ABSTRACT_FROM => 'lib/strictures.pm',
- AUTHOR => 'Matt S Trout <mst@shadowcat.co.uk>',
- LICENSE => 'perl',
);
-use strict;
-use warnings FATAL => 'all';
+use Distar;
-{
- package MY;
-
- {
- no warnings 'once'; push @ExtUtils::MakeMaker::Overridable, 'find_tests';
- }
-
- sub find_tests {
- shift->SUPER::find_tests.' xt/*.t';
- }
-
- sub postamble { 'include maint/Makefile.include' }
-}
-
-{
- no warnings 'redefine';
- sub WriteMakefile {
- my %args = @_;
- ExtUtils::MakeMaker::WriteMakefile(
- %args,
- AUTHOR => 'Matt S Trout <mst@shadowcat.co.uk>',
- ABSTRACT_FROM => $args{VERSION_FROM},
- );
- }
-}
-
-sub manifest_include {
- use autodie;
- my @files = @_;
- my @parts;
- while (my ($dir, $spec) = splice(@files, 0, 2)) {
- my $re = ($dir ? $dir.'/' : '').
- ((ref($spec) eq 'Regexp')
- ? $spec
- : !ref($spec)
- ? ".*\Q${spec}\E"
- : die "spec must be string or regexp, was: ${spec} (${\ref $spec})");
- push @parts, $re;
- }
- my $final = '^(?!'.join('|', map "${_}\$", @parts).')';
- open my $skip, '>', 'MANIFEST.SKIP';
- print $skip "${final}\n";
- close $skip;
-}
+author 'mst - Matt S. Trout (cpan:MSTROUT) <mst@shadowcat.co.uk>';
manifest_include(
- 'lib' => '.pm',
- 't' => '.t',
- 't/lib' => '.pm',
- 'xt' => '.t',
- 'xt/lib' => '.pm',
- '' => '.PL',
- '' => qr{Changes|MANIFEST|README|META\.yml},
'' => qr{t/smells-of-vcs/.svn},
- 'maint' => qr{[^.].*},
);
-
-1;