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

[Dominic D. <sho...@ma...>]

Sorry for the absence.

On 2006=9603=9607, at 18:04, Yitzchak Scott-Thoennes wrote:

> 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 .=3D $exe unless $thisperl =3D~ 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.

I think this has been overtaken by events, but no, it doesn't:

$ ./TEST ../lib/Module/Build/t/basic.t
t/../lib/Module/Build/t/basic....Warning: Removing existing directory =20=

'/Volumes/Tottie/Other/src/Perl/perl-current-working/t/_tmp/Simple'
Use of uninitialized value $_ in concatenation (.) or string at /=20
Volumes/Tottie/Other/src/Perl/perl-current-working/t/../lib/Module/=20
Build/Base.pm line 341.
Use of uninitialized value in warn at /Volumes/Tottie/Other/src/Perl/=20
perl-current-working/t/../lib/Module/Build/Base.pm line 341.
checking in , $^X is ./perl, perl is /Volumes/Tottie/Other/src/Perl/=20
perl-current-working/t/_tmp/Simple/perl, -f $perl is  at /Volumes/=20
Tottie/Other/src/Perl/perl-current-working/t/../lib/Module/Build/=20
Base.pm line 341.
Use of uninitialized value $_ in concatenation (.) or string at /=20
Volumes/Tottie/Other/src/Perl/perl-current-working/t/../lib/Module/=20
Build/Base.pm line 341.
Use of uninitialized value in warn at /Volumes/Tottie/Other/src/Perl/=20
perl-current-working/t/../lib/Module/Build/Base.pm line 341.
checking in , $^X is ./perl, perl is /usr/local/bin/perl5.9.4, -f =20
$perl is  at /Volumes/Tottie/Other/src/Perl/perl-current-working/t/../=20=

lib/Module/Build/Base.pm line 341.
...
--=20
Dominic Dunlop