7 author manifest_include
12 shift->export_to_level(1,@_);
15 sub author { our $Author = shift }
24 '' => qr{Changes|MANIFEST|README|META\.yml},
25 '' => qr{t/smells-of-vcs/.svn},
26 'maint' => qr{[^.].*},
29 sub manifest_include {
33 sub write_manifest_skip {
35 my @files = @Manifest;
37 while (my ($dir, $spec) = splice(@files, 0, 2)) {
38 my $re = ($dir ? $dir.'/' : '').
39 ((ref($spec) eq 'Regexp')
43 : die "spec must be string or regexp, was: ${spec} (${\ref $spec})");
46 my $final = '^(?!'.join('|', map "${_}\$", @parts).')';
47 open my $skip, '>', 'MANIFEST.SKIP';
48 print $skip "${final}\n";
52 sub MY::postamble { <<'END'; }
53 upload: $(DISTVNAME).tar$(SUFFIX)
56 git commit -a -m "Release commit for $(VERSION)"
57 git tag release_$(VERSION)
63 no warnings 'redefine';
64 sub main::WriteMakefile {
66 system("pod2text $args{VERSION_FROM} >README");
67 ExtUtils::MakeMaker::WriteMakefile(
68 @_, AUTHOR => our $Author, ABSTRACT_FROM => $args{VERSION_FROM},
69 test => { TESTS => ($args{test}{TESTS}||'').' xt/*.t' },