This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
further MM_VMS.pm tweak
authorCraig A. Berry <craigberry@mac.com>
Wed, 28 Mar 2001 18:02:20 +0000 (12:02 -0600)
committerJarkko Hietaniemi <jhi@iki.fi>
Fri, 30 Mar 2001 02:16:05 +0000 (02:16 +0000)
Message-Id: <5.0.2.1.0.20010328172535.017d5600@exchi01>

p4raw-id: //depot/perl@9459

lib/ExtUtils/MM_VMS.pm

index 072bc28..04a42d9 100644 (file)
@@ -1389,7 +1389,7 @@ END
     push @m,
 qq[POD2MAN_EXE = $pod2man_exe\n],
 q[POD2MAN = $(PERL) -we "%m=@ARGV;for (keys %m){" -
--e "system(""MCR $^X "-I$(PERL_ARCHLIB)" "-I$(PERL_LIB)" $(POD2MAN_EXE) $_ >$m{$_}"");}"
+-e "system(qq/MCR $^X ""-I$(PERL_ARCHLIB)"" ""-I$(PERL_LIB)"" $(POD2MAN_EXE) $_ >$m{$_}/);}"
 ];
     push @m, "\nmanifypods : \$(MAN1PODS) \$(MAN3PODS)\n";
     if (%{$self->{MAN1PODS}} || %{$self->{MAN3PODS}}) {