fix Liblist.pm to find entries that are plain pathnames on win32
authorGurusamy Sarathy <gsar@cpan.org>
Wed, 22 Jul 1998 06:04:25 +0000 (06:04 +0000)
committerGurusamy Sarathy <gsar@cpan.org>
Wed, 22 Jul 1998 06:04:25 +0000 (06:04 +0000)
p4raw-id: //depot/perl@1622

lib/ExtUtils/Liblist.pm

index 6c2fef8..94f3601 100644 (file)
@@ -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")) {