[Module-build-general] Patch to stop annoying warning on ./Build

[Ken Y. C. <kc...@lo...>]

All,

I wrote a couple weeks ago about this annoying warning:

 * WARNING: Configuration was initially created with '/usr/bin/perl',
   but we are now using '/usr/local/bin/perl'.

I finally took a couple minutes to look at the source, and I see that
the "Build" script uses $Config{'startperl'} for the shebang, but most
everything else looks for Module::Build::Base->find_perl_interpreter.
The following patch fixes that.

ky

*** Base.pm.orig        Fri Sep 19 13:33:14 2003
--- Base.pm     Fri Sep 19 13:31:43 2003
***************
*** 713,720 ****

    my $quoted_INC = join ",\n", map "     '$_'", @myINC;

    print $fh <<EOF;
! $self->{config}{startperl}

  BEGIN {
    \$^W = 1;  # Use warnings
--- 713,723 ----

    my $quoted_INC = join ",\n", map "     '$_'", @myINC;

+   my $perl = $self->find_perl_interpreter
+     or warn "Warning: Can't locate your perl binary";
+
    print $fh <<EOF;
! #!$perl

  BEGIN {
    \$^W = 1;  # Use warnings