diff options
| author | Robin Barker <Robin.Barker@npl.co.uk> | 2009-09-25 13:56:23 +0100 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgs@consttype.org> | 2009-09-27 17:36:12 +0200 |
| commit | ffff3758321ce19c1a12dee2d933f1bca64b7861 (patch) | |
| tree | 9beca6a3e7414996876a169405f58d7e43d79476 | |
| parent | c89b1b456b3a3583191350ddba59863084ea6795 (diff) | |
| download | perl-ffff3758321ce19c1a12dee2d933f1bca64b7861.tar.gz | |
fix up ABSTRACT_FROM
| -rw-r--r-- | make_ext.pl | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/make_ext.pl b/make_ext.pl index 04c2addedc..c6c6378087 100644 --- a/make_ext.pl +++ b/make_ext.pl @@ -319,6 +319,9 @@ sub build_extension { unless ($fromname) { die "For $mname tried @locations in in $ext_dir but can't find source"; } + my $pod_name; + ($pod_name = $fromname) =~ s/\.pm\z/.pod/; + $pod_name = $fromname unless -e $pod_name; open my $fh, '>', 'Makefile.PL' or die "Can't open Makefile.PL for writing: $!"; print $fh <<"EOM"; @@ -333,7 +336,7 @@ use ExtUtils::MakeMaker; WriteMakefile( NAME => '$mname', VERSION_FROM => '$fromname', - ABSTRACT_FROM => '$fromname', + ABSTRACT_FROM => '$pod_name', realclean => {FILES => 'Makefile.PL'}, ); |