diff options
| author | Paul Marquess <paul.marquess@btinternet.com> | 2000-12-10 15:35:07 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-12-10 18:31:27 +0000 |
| commit | 0a022e8e9f2eec4dde5e31513c787e06f89c8a31 (patch) | |
| tree | c9ebdc7b3ef8380bdd26a0b39217b56253845e2a /lib/ExtUtils | |
| parent | 1af49140dac0f1fa227cd76050c3b79235713839 (diff) | |
| download | perl-0a022e8e9f2eec4dde5e31513c787e06f89c8a31.tar.gz | |
Ambiguous -%c() resolved as a file test
Message-ID: <002601c062be$c5f749c0$a20a140a@bfs.phone.com>
p4raw-id: //depot/perl@8074
Diffstat (limited to 'lib/ExtUtils')
| -rw-r--r-- | lib/ExtUtils/Liblist.pm | 2 | ||||
| -rw-r--r-- | lib/ExtUtils/MM_Unix.pm | 1 |
2 files changed, 3 insertions, 0 deletions
diff --git a/lib/ExtUtils/Liblist.pm b/lib/ExtUtils/Liblist.pm index 5e2f91db5c..48c0ad53ea 100644 --- a/lib/ExtUtils/Liblist.pm +++ b/lib/ExtUtils/Liblist.pm @@ -1,5 +1,7 @@ package ExtUtils::Liblist; +no warnings 'ambiguous'; # silence the -f() file tests. + @ISA = qw(ExtUtils::Liblist::Kid File::Spec); sub lsdir { diff --git a/lib/ExtUtils/MM_Unix.pm b/lib/ExtUtils/MM_Unix.pm index e926ca7d66..c88f8f7a79 100644 --- a/lib/ExtUtils/MM_Unix.pm +++ b/lib/ExtUtils/MM_Unix.pm @@ -1712,6 +1712,7 @@ from the perl source tree. $self->{PERL_INC} = $self->catdir("$self->{PERL_ARCHLIB}","CORE"); # wild guess for now my $perl_h; + no warnings 'uninitialized' ; if (not -f ($perl_h = $self->catfile($self->{PERL_INC},"perl.h")) and not $old){ # Maybe somebody tries to build an extension with an |