From effe640e5d4723ca15c089ab4d60e81bf349aa37 Mon Sep 17 00:00:00 2001
From: "Matthew Horsfall (alh)" <wolfsage@gmail.com>
Date: Sun, 19 Apr 2015 11:07:54 -0400
Subject: When bisecting with modules, actually use a fresh build dir every
 build.

---
 Porting/bisect-runner.pl | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'Porting/bisect-runner.pl')

diff --git a/Porting/bisect-runner.pl b/Porting/bisect-runner.pl
index 69f35dffbb..b1a501fc81 100755
--- a/Porting/bisect-runner.pl
+++ b/Porting/bisect-runner.pl
@@ -5,6 +5,7 @@ use Getopt::Long qw(:config bundling no_auto_abbrev);
 use Pod::Usage;
 use Config;
 use File::Temp qw(tempdir);
+use File::Spec;
 
 my @targets
     = qw(none config.sh config.h miniperl lib/Config.pm Fcntl perl test_prep);
@@ -1462,8 +1463,15 @@ if ($options{module} || $options{'with-module'}) {
   delete $ENV{PERL_MB_OPT};
   delete $ENV{PERL_MM_OPT};
 
+  # Make sure we load up our CPAN::MyConfig and then
+  # override the build_dir so we have a fresh one
+  # every build
+  my $cdir = File::Spec->catfile($ENV{HOME},".cpan");
+
   my @cpanshell = (
     "$prefix/bin/perl",
+    "-I", "$cdir",
+    "-MCPAN::MyConfig",
     "-MCPAN",
     "-e","\$CPAN::Config->{build_dir}=q{$bdir};",
     "-e",
-- 
cgit v1.2.1