From: Doug MacEachern <dougm@opengroup.org>
Date: Tue, 11 Mar 1997 03:58:38 +0000 (-0500)
Subject: Fix typo in -l*perl* pattern
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=ddab96b77391e288333a995edd0cbe8bc02d2481;p=p5sagit%2Fp5-mst-13.2.git

Fix typo in -l*perl* pattern

one tiny Embed.pm patch for libperlm and friends

p5p-msgid: 199703110400.XAA20694@sinistar.idle.com
private-msgid: 199703110414.XAA12884@berlin.atlantic.net
---

diff --git a/lib/ExtUtils/Embed.pm b/lib/ExtUtils/Embed.pm
index 39d797e..e985056 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(/^(-lperl\w+)$/, @link_args))[0] || "-lperl";
 
     my($extralibs, $bsloadlibs, $ldloadlibs, $ld_run_path) =
 	$MM->ext(join ' ',