This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Reinstate tests removed by change #30381, but don't
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>
Thu, 22 Feb 2007 18:29:18 +0000 (18:29 +0000)
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>
Thu, 22 Feb 2007 18:29:18 +0000 (18:29 +0000)
"use Config" in the test, because that will overwrite
%main::Config with the real Config hash, not the fake
one from MakeMaker.
p4raw-link: @30381 on //depot/perl: cb7d39f54ca678d4ba0e91eaea2d10f4ab6317d7

p4raw-id: //depot/perl@30382

lib/ExtUtils/t/build_man.t

index 1b92829..0dd7eb1 100644 (file)
@@ -15,11 +15,17 @@ BEGIN {
 use strict;
 use Test::More tests => 9;
 
+use File::Spec;
 use TieOut;
 use MakeMaker::Test::Utils;
 use MakeMaker::Test::Setup::BFD;
 
 use ExtUtils::MakeMaker;
+use ExtUtils::MakeMaker::Config;
+
+# Simulate an installation which has man page generation turned off to
+# ensure these tests will still work.
+$Config{installman3dir} = 'none';
 
 chdir 't';
 
@@ -37,7 +43,6 @@ ok( chdir 'Big-Dummy', "chdir'd to Big-Dummy" ) ||
 ok( my $stdout = tie *STDOUT, 'TieOut' );
 
 SKIP: {
-    use Config;
     skip ("installman3dir is null", 1)
        if !$Config{installman3dir} or
            $Config{installman3dir} !~ /\S/ or
@@ -51,6 +56,8 @@ SKIP: {
 }
 
 {
+    local $Config{installman3dir} = File::Spec->catdir(qw(t lib));
+
     my $mm = WriteMakefile(
         NAME            => 'Big::Dummy',
         VERSION_FROM    => 'lib/Big/Dummy.pm',