Use linker flags rather than compiler flags in ExtUtils::Liblist::Kid::_vms_ext

when determining whether the perlshr library was linked debug. Also submitted
to CPAN RT queue at <http://rt.cpan.org/Ticket/Display.html?id=25268>.

p4raw-id: //depot/perl@30462

diff --git a/lib/ExtUtils/Liblist/Kid.pm b/lib/ExtUtils/Liblist/Kid.pm
index 2f8e527..b1d4236 100644 (file)
--- a/lib/ExtUtils/Liblist/Kid.pm
+++ b/lib/ExtUtils/Liblist/Kid.pm
@@ -10,7 +10,7 @@ use 5.00503;
 
 use strict;
 use vars qw($VERSION);
-$VERSION = 1.32;
+$VERSION = 1.32_01;
 
 use Config;
 use Cwd 'cwd';
@@ -376,8 +376,7 @@ sub _vms_ext {
   $verbose ||= 0;
 
   my(@crtls,$crtlstr);
-  my($dbgqual) = $self->{OPTIMIZE} || $Config{'optimize'} ||
-                 $self->{CCFLAGS}   || $Config{'ccflags'};
+  my($dbgqual) = $self->{'ldflags'} . $Config{'ldflags'};
   @crtls = ( ($dbgqual =~ m-/Debug-i ? $Config{'dbgprefix'} : '')
               . 'PerlShr/Share' );
   push(@crtls, grep { not /\(/ } split /\s+/, $Config{'perllibs'});