From: J. David Blackstone <jdb@dfwnet.sbms.sbc.com>
Date: Thu, 20 Jul 2000 13:31:22 +0000 (-0500)
Subject: [ID 20000720.004] ExtUtils::MakeMaker finds wrong version of perl
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=ec751b0b28de92f8292739cf0ae5c4f54fd86b6a;p=p5sagit%2Fp5-mst-13.2.git

[ID 20000720.004] ExtUtils::MakeMaker finds wrong version of perl
Message-Id: <200007201831.NAA05776@dfwnet1.dfwnet.sbms.sbc.com>

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

diff --git a/lib/ExtUtils/MM_Unix.pm b/lib/ExtUtils/MM_Unix.pm
index 1afd210..52862c5 100644
--- a/lib/ExtUtils/MM_Unix.pm
+++ b/lib/ExtUtils/MM_Unix.pm
@@ -1140,9 +1140,9 @@ in these dirs:
 @$dirs
 ";
     }
-    foreach $dir (@$dirs){
-	next unless defined $dir; # $self->{PERL_SRC} may be undefined
-	foreach $name (@$names){
+    foreach $name (@$names){
+	foreach $dir (@$dirs){
+	    next unless defined $dir; # $self->{PERL_SRC} may be undefined
 	    my ($abs, $val);
 	    if ($self->file_name_is_absolute($name)) { # /foo/bar
 		$abs = $name;