This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
lib scan fix
authorJarkko Hietaniemi <jhi@iki.fi>
Wed, 9 Feb 2000 02:22:50 +0000 (02:22 +0000)
committerJarkko Hietaniemi <jhi@iki.fi>
Wed, 9 Feb 2000 02:22:50 +0000 (02:22 +0000)
p4raw-id: //depot/metaconfig@5046

U/modified/libs.U

index c552bb7..f284c8c 100644 (file)
@@ -111,12 +111,9 @@ for thislib in $libswanted; do
 ?X: the case with the old looking pattern *-l$thislib*.
 ?X:
        libname="$thislib"
-       if xxx=`./loc lib$thislib.$so.[0-9]'*' X $libpth`; $test -f "$xxx"; then
-               if $test "X$ignore_versioned_solibs" = "X"; then
-                       xxx=/ignored$xxx
-               else
-                       libstyle=shared
-               fi
+       if xxx=`./loc lib$thislib.$so.[0-9]'*' X $libpth`
+          $test -f "$xxx" -a "X$ignore_versioned_solibs" = "X" ; then
+               libstyle=shared
        elif xxx=`./loc lib$thislib.$so X $libpth` ; $test -f "$xxx"; then
                libstyle=shared
        elif xxx=`./loc lib$thislib$_a X $libpth`; $test -f "$xxx"; then