diff options
| author | Dave Mitchell <davem@fdisolutions.com> | 2004-02-17 21:52:08 +0000 |
|---|---|---|
| committer | Dave Mitchell <davem@fdisolutions.com> | 2004-02-17 21:52:08 +0000 |
| commit | 76df5e8f6f9a368c3b6f3dcca177104be7f3fc8c (patch) | |
| tree | 4aee5575154e7b0037b35ce06a93486173c9f9eb /lib/ExtUtils | |
| parent | 9b11ae5efd28ae7e3371a10346290d0fad9432ad (diff) | |
| download | perl-76df5e8f6f9a368c3b6f3dcca177104be7f3fc8c.tar.gz | |
remove C<my $x if foo> construct from core modules
p4raw-id: //depot/perl@22322
Diffstat (limited to 'lib/ExtUtils')
| -rw-r--r-- | lib/ExtUtils/Liblist/Kid.pm | 6 | ||||
| -rw-r--r-- | lib/ExtUtils/MM_NW5.pm | 6 | ||||
| -rw-r--r-- | lib/ExtUtils/MM_Win95.pm | 6 |
3 files changed, 9 insertions, 9 deletions
diff --git a/lib/ExtUtils/Liblist/Kid.pm b/lib/ExtUtils/Liblist/Kid.pm index e3c7a1fcf3..d67aa01963 100644 --- a/lib/ExtUtils/Liblist/Kid.pm +++ b/lib/ExtUtils/Liblist/Kid.pm @@ -227,9 +227,9 @@ sub _win32_ext { return ("", "", "", "", ($give_libs ? [] : ())) unless $potential_libs; my $cc = $Config{cc}; - my $VC = 1 if $cc =~ /^cl/i; - my $BC = 1 if $cc =~ /^bcc/i; - my $GC = 1 if $cc =~ /^gcc/i; + my $VC = $cc =~ /^cl/i; + my $BC = $cc =~ /^bcc/i; + my $GC = $cc =~ /^gcc/i; my $so = $Config{'so'}; my $libs = $Config{'perllibs'}; my $libpth = $Config{'libpth'}; diff --git a/lib/ExtUtils/MM_NW5.pm b/lib/ExtUtils/MM_NW5.pm index 4e626cc23e..ca856df9da 100644 --- a/lib/ExtUtils/MM_NW5.pm +++ b/lib/ExtUtils/MM_NW5.pm @@ -32,9 +32,9 @@ use ExtUtils::MakeMaker qw( &neatvalue ); $ENV{EMXSHELL} = 'sh'; # to run `commands` -my $BORLAND = 1 if $Config{'cc'} =~ /^bcc/i; -my $GCC = 1 if $Config{'cc'} =~ /^gcc/i; -my $DMAKE = 1 if $Config{'make'} =~ /^dmake/i; +my $BORLAND = $Config{'cc'} =~ /^bcc/i; +my $GCC = $Config{'cc'} =~ /^gcc/i; +my $DMAKE = $Config{'make'} =~ /^dmake/i; =item os_flavor diff --git a/lib/ExtUtils/MM_Win95.pm b/lib/ExtUtils/MM_Win95.pm index 13b11237d7..fe3c170c6b 100644 --- a/lib/ExtUtils/MM_Win95.pm +++ b/lib/ExtUtils/MM_Win95.pm @@ -6,9 +6,9 @@ $VERSION = 0.03; require ExtUtils::MM_Win32; @ISA = qw(ExtUtils::MM_Win32); -use Config;
-my $DMAKE = 1 if $Config{'make'} =~ /^dmake/i; -my $NMAKE = 1 if $Config{'make'} =~ /^nmake/i; +use Config; +my $DMAKE = $Config{'make'} =~ /^dmake/i; +my $NMAKE = $Config{'make'} =~ /^nmake/i; =head1 NAME |