A hack for t/harness to restore the ability to run tests listed in @ARGV

1 files changed, 4 insertions, 1 deletions

diff --git a/t/harness b/t/harness
index d9dac05d4c..7748c26f99 100644
--- a/t/harness
+++ b/t/harness
@@ -12,6 +12,7 @@ my $torture; # torture testing?
 
 use TAP::Harness 3.13;
 use strict;
+use Config;
 
 $::do_nothing = $::do_nothing = 1;
 require './TEST';
@@ -109,6 +110,9 @@ if (@ARGV) {
     else {
 	@tests = @ARGV;
     }
+    # This is a hack to force config_heavy.pl to be loaded, before the
+    # prep work for running a test changes directory.
+    1 if $Config{d_fork};
 } else {
     # Ideally we'd get somewhere close to Tux's Oslo rules
     # my $rules = {
@@ -157,7 +161,6 @@ if (@ARGV) {
 	push @seq, $next;
 
 	my @last;
-	use Config;
 	push @last,  sort { lc $a cmp lc $b }
 	    _tests_from_manifest($Config{extensions}, $Config{known_extensions});
 	push @last, <x2p/*.t>;