From: Craig A. Berry <craigberry@mac.com>
Date: Thu, 8 Mar 2007 03:50:32 +0000 (+0000)
Subject: MM->{ldflags} may not be defined and wouldn't help us locate
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=912e62e3c624075aa313679194a8fb6d2856c610;p=p5sagit%2Fp5-mst-13.2.git

MM->{ldflags} may not be defined and wouldn't help us locate
the perlshr library anyway (follow-up to #30462).

p4raw-id: //depot/perl@30511
---

diff --git a/lib/ExtUtils/Liblist/Kid.pm b/lib/ExtUtils/Liblist/Kid.pm
index c61161c..ee1522d 100644
--- a/lib/ExtUtils/Liblist/Kid.pm
+++ b/lib/ExtUtils/Liblist/Kid.pm
@@ -376,7 +376,7 @@ sub _vms_ext {
   $verbose ||= 0;
 
   my(@crtls,$crtlstr);
-  my($dbgqual) = $self->{'ldflags'} . $Config{'ldflags'};
+  my($dbgqual) = $Config{'ldflags'};
   @crtls = ( ($dbgqual =~ m-/Debug-i ? $Config{'dbgprefix'} : '')
               . 'PerlShr/Share' );
   push(@crtls, grep { not /\(/ } split /\s+/, $Config{'perllibs'});