From: Chip Salzenberg <chip@atlantic.net>
Date: Sat, 8 Mar 1997 23:57:19 +0000 (+1200)
Subject: Fix typo in -l*perl* pattern
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=2d5bef1dcb55d801c074eeb82c2274f05431368d;p=p5sagit%2Fp5-mst-13.2.git

Fix typo in -l*perl* pattern

(this is the same change as commit ddab96b77391e288333a995edd0cbe8bc02d2481, but as applied)
---

diff --git a/lib/ExtUtils/Embed.pm b/lib/ExtUtils/Embed.pm
index 39d797e..b6097f4 100644
--- a/lib/ExtUtils/Embed.pm
+++ b/lib/ExtUtils/Embed.pm
@@ -199,7 +199,7 @@ sub ldopts {
     }
     #print STDERR "\@potential_libs = @potential_libs\n";
 
-    my $libperl = (grep(/^(-l\w+perl)$/, @link_args))[0] || "-lperl";
+    my $libperl = (grep(/^-l\w*perl\w*$/, @link_args))[0] || "-lperl";
 
     my($extralibs, $bsloadlibs, $ldloadlibs, $ld_run_path) =
 	$MM->ext(join ' ',