suppress manifypods leak in extensions

p4raw-id: //depot/perl@1922

diff --git a/ext/Errno/Makefile.PL b/ext/Errno/Makefile.PL
index ffc8c4b..bb1467b 100644 (file)
--- a/ext/Errno/Makefile.PL
+++ b/ext/Errno/Makefile.PL
@@ -5,6 +5,7 @@ use ExtUtils::MakeMaker;
 WriteMakefile(
     NAME        => 'Errno',
     VERSION_FROM => 'Errno_pm.PL',
+    MAN3PODS     => ' ',       # Pods will be built by installman.
     PL_FILES    => {'Errno_pm.PL'=>'Errno.pm'},
     PM          => {'Errno.pm' => '$(INST_LIBDIR)/Errno.pm'},
     'clean'     => {FILES => 'Errno.pm'},

diff --git a/ext/IPC/SysV/Makefile.PL b/ext/IPC/SysV/Makefile.PL
index c8e320f..370a965 100644 (file)
--- a/ext/IPC/SysV/Makefile.PL
+++ b/ext/IPC/SysV/Makefile.PL
@@ -22,6 +22,7 @@ sub MY::libscan
 WriteMakefile(
        VERSION_FROM    => "SysV.pm",
        NAME            => "IPC::SysV",
+       MAN3PODS        => ' ',         # Pods will be built by installman.
  
        'dist'          => {COMPRESS => 'gzip -9f',
                            SUFFIX   => 'gz', 

diff --git a/pod/pod2man.PL b/pod/pod2man.PL
index 8040bf5..9d0ecc3 100644 (file)
--- a/pod/pod2man.PL
+++ b/pod/pod2man.PL
@@ -318,8 +318,8 @@ $cutting = 1;
 # running an installed version of Perl to produce documentation from an
 # uninstalled newer version's pod files.
 if ($^O ne 'plan9' and $^O ne 'dos' and $^O ne 'os2' and $^O ne 'MSWin32') {
-  ($version,$patch) =
-    `\PATH=.:..:\$PATH; perl -v` =~ /version (\d\.\d{3})(?:_(\d{2}))?/;
+  my $perl = (-x './perl') ? './perl' : ((-x '../perl') ? '../perl' : '');
+  ($version,$patch) = `$perl -e 'print $]'` =~ /^(\d\.\d{3})(\d{2})?/ if $perl;
 }
 # No luck; we'll just go with the running Perl's version
 ($version,$patch) = $] =~ /^(.{5})(\d{2})?/ unless $version;