From: Gurusamy Sarathy <gsar@cpan.org>
Date: Wed, 22 Jul 1998 06:04:25 +0000 (+0000)
Subject: fix Liblist.pm to find entries that are plain pathnames on win32
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d9b182a2f420a1c4f024131a241f41b0a4ceb26e;p=p5sagit%2Fp5-mst-13.2.git

fix Liblist.pm to find entries that are plain pathnames on win32

p4raw-id: //depot/perl@1622
---

diff --git a/lib/ExtUtils/Liblist.pm b/lib/ExtUtils/Liblist.pm
index 6c2fef8..94f3601 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")) {