From: Tony Cook Date: Thu, 6 Dec 2018 09:08:49 +0000 (+1100) Subject: support libbase as an arrayref for fake probing X-Git-Tag: v1.008~4 X-Git-Url: http://git.imager.perl.org/imager.git/commitdiff_plain/2c28bd960066a10591e7b8a498b5f2d9fcbc34c4 support libbase as an arrayref for fake probing --- diff --git a/lib/Imager/Probe.pm b/lib/Imager/Probe.pm index 9fabb817..0bb38256 100644 --- a/lib/Imager/Probe.pm +++ b/lib/Imager/Probe.pm @@ -4,7 +4,7 @@ use File::Spec; use Config; use Cwd (); -our $VERSION = "1.005"; +our $VERSION = "1.006"; my @alt_transfer = qw/altname incsuffix libbase/; @@ -300,7 +300,10 @@ sub _probe_fake { elsif (defined $req->{libbase}) { # might not need extra libraries, eg. Win32 perl already links # everything - $lopts = $req->{libbase} ? "-l$req->{libbase}" : ""; + my @libs = $req->{libbase} + ? ( ref $req->{libbase} ? @{$ref->{libbase}} : $ref->{libbase} ) + : (); + $lopts = join " ", map _lib_option($_), @libs; } if (defined $lopts) { print "$req->{name}: Checking if the compiler can find them on its own\n";