[Bast-commits] r3733 - local-lib/1.000/trunk

[matthewt at dev.catalyst.perl.org]

Author: matthewt
Date: 2007-09-13 23:01:02 +0100 (Thu, 13 Sep 2007)
New Revision: 3733

Modified:
   local-lib/1.000/trunk/Makefile.PL
Log:
heinous bootstrapping code

Modified: local-lib/1.000/trunk/Makefile.PL
===================================================================
--- local-lib/1.000/trunk/Makefile.PL	2007-09-13 22:00:46 UTC (rev 3732)
+++ local-lib/1.000/trunk/Makefile.PL	2007-09-13 22:01:02 UTC (rev 3733)
@@ -1,11 +1,55 @@
 use strict;
 use warnings;
+use vars qw($bootstrapping);
+
+BEGIN {
+  if (grep { /^--bootstrap(?:=(.*))?$/ } @ARGV) {
+    $bootstrapping = 1;
+    my @args = (defined $1 ? ($1) : ());
+
+    {
+      local @INC = @INC;
+      unshift(@INC, 'lib');
+      require local::lib;
+    }
+
+    local::lib->import(@args);
+
+    push(@ARGV,$ENV{PERL_MM_OPT});
+
+    system($^X, '-MExtUtils::MakeMaker 6.31', '-e1');
+    my $r = $? >> 8;
+
+    # XXX - remove the force on EUMM once its test suite survive PERL_MM_OPT
+
+    if ($r) { # non-zero exit
+      system($^X, '-MCPAN', '-e', 'force("install","ExtUtils::MakeMaker");');
+    }
+
+  }
+}
+
 use inc::Module::Install;
 
 name 'local-lib';
 all_from 'lib/local/lib.pm';
 
+include('CPAN');
+include('CPAN::HandleConfig');
+include('CPAN::Debug');
+include('CPAN::Version');
+include('CPAN::Tarzip');
+
 requires 'ExtUtils::MakeMaker' => '6.31'; # version INSTALL_BASE was added
+requires 'ExtUtils::CBuilder'; # this and ParseXS are needed for MB C_support
+requires 'ExtUtils::ParseXS';
 requires 'Module::Build' => '0.28'; # lib -> lib/perl5 change
+requires 'CPAN' => '1.80'; # sudo support
 
+if ($bootstrapping) {
+  auto_install_now;
+} else {
+  auto_install;
+}
+
 WriteAll;