[Module::Build] Re: [PATCH] add Module::Build 0.27_08

[Yitzchak Scott-T. <sth...@ef...>]

On Tue, Mar 07, 2006 at 12:35:13PM +0100, Dominic Dunlop wrote:
> On 2006?03?07, at 12:28, Rafael Garcia-Suarez wrote:
> 
> >Dominic Dunlop wrote:
> >>lib/Module/Build/t/basic...................................Perl  
> >>lib version (5.9.4) doesn't match executable version (v5.8.6) at / 
> >>Volumes/Tottie/Other/src/Perl/perl-current-working/lib/Config.pm  
> >>line 46.
> >
> >That pretty much sums up the problem, the test thinks
> >it should use the system's perl instead of the currently
> >built one.
> >
> >(I don't know why, it works here)
> 
> Shooting in the dark: I'm building on a case-preserving but case- 
> ignoring filesystem.

Does this help:

--- lib/Module/Build/Base.pm.orig	2006-03-06 07:43:57.093750000 -0800
+++ lib/Module/Build/Base.pm	2006-03-07 09:00:28.884844800 -0800
@@ -334,7 +334,8 @@
     $thisperl .= $exe unless $thisperl =~ m/$exe$/i;
   }
   
-  foreach my $perl ( $c->{perlpath},
+  foreach my $perl ( File::Spec->rel2abs($^X),
+                     $c->{perlpath},
 		     map File::Spec->catfile($_, $thisperl), File::Spec->path()
 		   ) {
     return $perl if -f $perl and $proto->_perl_is_same($perl);
End of Patch.

(Question for module-build-general only: why is absolute $^X exempt from
the _perl_is_same check?)