1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
|
# Build instructions for podlators.
#
# We need to use ExtUtils::MakeMaker since this module is part of Perl core,
# which only supports that build method, and because it is a dependency of
# other build systems like Module::Build.
#
# Copyright 1999, 2000, 2001, 2008, 2010, 2012, 2014, 2015, 2016
# Russ Allbery <rra@cpan.org>
#
# This program is free software; you may redistribute it and/or modify it
# under the same terms as Perl itself.
use 5.006;
use strict;
use warnings;
use Config;
use ExtUtils::MakeMaker;
use File::Spec;
# Generate full paths for scripts distributed in the bin directory.
#
# @scripts - List of script names
#
# Returns: List of relative paths from top of distribution
sub scripts {
my (@scripts) = @_;
return map { File::Spec->catfile('bin', $_) } @scripts;
}
# Generate an association between a source file and a destination man page for
# non-module man pages. ExtUtils::MakeMaker only really understands how to
# generate man pages for modules, so we need to help it for the script man
# pages and (particularly) the perlpodstyle man page.
#
# $directory - Directory containing the file
# $file - File containing POD in that directory
#
# Returns: The path to the file with POD and the output man page, as a pair
sub man1pod {
my ($directory, $file) = @_;
# Determine the base name of the file by stripping any *.pod suffix.
my $basename = $file;
$basename =~ s{ [.]pod }{}xms;
# Determine the output file name for the generated man page.
my $outname = $basename . q{.} . $Config{man1ext};
my $outpath = File::Spec->catfile(qw(blib man1), $outname);
return (File::Spec->catfile($directory, $file), $outpath);
}
# The hash of all the metadata. This will be modified before WriteMakefile to
# remove keys not supported by the local version of ExtUtils::MakeMaker.
my %metadata = (
NAME => 'Pod',
DISTNAME => 'podlators',
ABSTRACT => 'Convert POD data to various other formats',
AUTHOR => 'Russ Allbery <rra@cpan.org>',
LICENSE => 'perl',
EXE_FILES => [scripts('pod2text', 'pod2man')],
VERSION_FROM => 'lib/Pod/Man.pm',
MIN_PERL_VERSION => '5.006',
# Override the files that generate section 1 man pages.
# (done differently in blead)
#MAN1PODS => {
# man1pod('bin', 'pod2man'),
# man1pod('bin', 'pod2text'),
# man1pod('pod', 'perlpodstyle'),
#},
# Dependencies on other modules.
PREREQ_PM => {
'Encode' => 0,
'Pod::Simple' => 3.06,
},
# ExtUtils::MakeMaker doesn't pick up nested test directories by default.
test => { TESTS => 't/*/*.t' },
# For older versions of Perl, we have to force installation into the Perl
# module directories since site modules did not take precedence over core
# modules.
INSTALLDIRS => $] lt '5.011' ? 'perl' : 'site',
# Additional metadata.
META_ADD => {
'meta-spec' => { version => 2 },
resources => {
bugtracker =>
'https://rt.cpan.org/Public/Dist/Display.html?Name=podlators',
homepage => 'http://www.eyrie.org/~eagle/software/podlators/',
repository => {
url => 'git://github.com/rra/podlators.git',
web => 'https://github.com/rra/podlators',
type => 'git',
},
},
},
);
# Remove keys that aren't supported by this version of ExtUtils::MakeMaker.
# This hash maps keys to the minimum supported version.
my %supported = (
LICENSE => 6.31,
META_ADD => 6.46,
MIN_PERL_VERSION => 6.48,
);
for my $key (keys(%supported)) {
if ($ExtUtils::MakeMaker::VERSION < $supported{$key}) {
delete $metadata{$key};
}
}
# Generate the actual Makefile. Pick an arbitrary module to pull the version
# from, since they should all have the same version.
WriteMakefile(%metadata);
|
