From: Magnus Hagander <magnus@hagander.net>
Date: Sun, 4 Mar 2018 17:00:16 +0000 (+0100)
Subject: Actually pick .lib file when multiple perl libs are present
X-Git-Tag: REL_11_BETA1~657
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=6946280cded903b6f5269fcce105f8ab1d455d33;p=postgresql

Actually pick .lib file when multiple perl libs are present

7240962f8626ff09bb8f9e71ecdb074775bdd035 got it right in the comment,
but the code did not actually do what the comment said. Fix that.

Issue pointed out by Noah Misch.
---

diff --git a/src/tools/msvc/Mkvcbuild.pm b/src/tools/msvc/Mkvcbuild.pm
index 123292f48d..72976f44d8 100644
--- a/src/tools/msvc/Mkvcbuild.pm
+++ b/src/tools/msvc/Mkvcbuild.pm
@@ -527,7 +527,7 @@ sub mkvcbuild
 		# Starting with ActivePerl 5.24, both  perlnn.lib and libperlnn.a are provided.
 		# In this case, prefer .lib.
 		my @perl_libs =
-		  grep { /perl\d+\.lib$|libperl\d+\.a$/ } glob($perl_path);
+		  reverse sort grep { /perl\d+\.lib$|libperl\d+\.a$/ } glob($perl_path);
 		if (@perl_libs > 0)
 		{
 			$plperl->AddLibrary($perl_libs[0]);