diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1998-07-22 06:04:25 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-07-22 06:04:25 +0000 |
| commit | d9b182a2f420a1c4f024131a241f41b0a4ceb26e (patch) | |
| tree | ec910abd503defca5df61b7cf122e6f72ed2811e | |
| parent | 92c2ed055315fc5be2c58f97c40236945f31f32e (diff) | |
| download | perl-d9b182a2f420a1c4f024131a241f41b0a4ceb26e.tar.gz | |
fix Liblist.pm to find entries that are plain pathnames on win32
p4raw-id: //depot/perl@1622
| -rw-r--r-- | lib/ExtUtils/Liblist.pm | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/lib/ExtUtils/Liblist.pm b/lib/ExtUtils/Liblist.pm index 6c2fef874f..94f36018e2 100644 --- a/lib/ExtUtils/Liblist.pm +++ b/lib/ExtUtils/Liblist.pm @@ -243,6 +243,14 @@ sub _win32_ext { } $thislib .= $libext if $thislib !~ /\Q$libext\E$/i; + # look for the file itself + if (-f $thislib) { + warn "'$thislib' found\n" if $verbose; + $found++; + push(@extralibs, $thislib); + next; + } + my($found_lib)=0; foreach $thispth (@searchpath, @libpath){ unless (-f ($fullname="$thispth\\$thislib")) { |