diff options
author | Max Maischein <corion@corion.net> | 2008-01-07 21:48:04 +0100 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2008-01-08 22:45:03 +0000 |
commit | 1f0bbb56807074c4a1da6fa28c421d1070fd4fff (patch) | |
tree | d69d09bda93d9b991a26444b73f759bfc65001e1 /lib/ExtUtils/MM_Unix.pm | |
parent | b0169937a1833d262bdcef83fc6595ccc076cb56 (diff) | |
download | perl-1f0bbb56807074c4a1da6fa28c421d1070fd4fff.tar.gz |
[patch] [Win32] Make Perl build on Win32 when the path contains whitespace
Message-ID: <478281F4.9000202@cpan.org>
p4raw-id: //depot/perl@32905
Diffstat (limited to 'lib/ExtUtils/MM_Unix.pm')
-rw-r--r-- | lib/ExtUtils/MM_Unix.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lib/ExtUtils/MM_Unix.pm b/lib/ExtUtils/MM_Unix.pm index 45507271f3..3f922d48c0 100644 --- a/lib/ExtUtils/MM_Unix.pm +++ b/lib/ExtUtils/MM_Unix.pm @@ -18,7 +18,7 @@ use vars qw($VERSION @ISA use ExtUtils::MakeMaker qw($Verbose neatvalue); -$VERSION = '6.42_01'; +$VERSION = '6.42_02'; $VERSION = eval $VERSION; require ExtUtils::MM_Any; @@ -1980,6 +1980,9 @@ sub init_PERL { $self->{ABSPERL} = 'MCR '.$self->{ABSPERL} if $has_mcr; } + $self->{ABSPERL} = qq{"$self->{ABSPERL}"} + if $self->{ABSPERL} =~ /\s/; + # Are we building the core? $self->{PERL_CORE} = $ENV{PERL_CORE} unless exists $self->{PERL_CORE}; $self->{PERL_CORE} = 0 unless defined $self->{PERL_CORE}; |