ld has many guises.

p4raw-id: //depot/perl@21273

diff --git a/lib/ExtUtils/t/MM_Unix.t b/lib/ExtUtils/t/MM_Unix.t
index c496e8e..571d2c5 100644 (file)
--- a/lib/ExtUtils/t/MM_Unix.t
+++ b/lib/ExtUtils/t/MM_Unix.t
@@ -239,8 +239,9 @@ foreach (qw/ EXPORT_LIST PERL_ARCHIVE PERL_ARCHIVE_AFTER LD /)
 {
     use Config;
     ok( exists $t->{$_}, "$_ was defined" );
-    if (exists $Config{lc $_}) {
-       is($t->{$_}, $Config{lc $_}, "$_ is like in %Config ($t->{$_})"); 
+    if ($_ eq 'LD' && defined $Config{ld}) {
+       like($t->{LD}, qr/^($Config{ld}|ld)$/,
+            "LD ($t->{LD}) is like in %Config ($t->{$_}) or 'ld'"); 
     } else {
        is($t->{$_}, '', "$_ is empty on Unix"); 
     }