diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2003-08-08 04:28:44 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-08-08 04:28:44 +0000 |
| commit | 071e6b84e51733024bc383ec15981f44c4d4a53c (patch) | |
| tree | 6174c81139ae9c8cdd869c22069aac0a65576054 /lib/ExtUtils/MM_Win32.pm | |
| parent | 2740392c45d51e34cd904b51afcc00544a78cf82 (diff) | |
| download | perl-071e6b84e51733024bc383ec15981f44c4d4a53c.tar.gz | |
Retract PASTHRU* changes as recommended by Schwern.
p4raw-id: //depot/perl@20560
Diffstat (limited to 'lib/ExtUtils/MM_Win32.pm')
| -rw-r--r-- | lib/ExtUtils/MM_Win32.pm | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lib/ExtUtils/MM_Win32.pm b/lib/ExtUtils/MM_Win32.pm index 004694c15b..d05c87054b 100644 --- a/lib/ExtUtils/MM_Win32.pm +++ b/lib/ExtUtils/MM_Win32.pm @@ -430,10 +430,8 @@ banner. sub pasthru { my($self) = shift; - my $pasthru = $self->SUPER::pasthru(); - $pasthru =~ s/PASTHRU\s*=\s*/PASTHRU = -nologo / if $NMAKE; - return $pasthru; - } + return "PASTHRU = " . ($NMAKE ? "-nologo" : ""); +} =item oneliner (o) |