Fix HARNESS_PERL_SWITCHES=-I handling in TAP::Harness::Env

Perl-Toolchain-Gang · Aug 13, 2023 · c2c6e52 · c2c6e52
1 parent 6eacd6c
commit c2c6e52
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 1 deletion.
diff --git a/Changes b/Changes
@@ -1,6 +1,7 @@
 Revision history for Test-Harness
 
         - Add missing negation in EINTR check
+        - Fix HARNESS_PERL_SWITCHES=-I handling in TAP::Harness::Env
 
 3.46  2023-07-30
         - Color the "ok"s as well.

diff --git a/lib/TAP/Harness/Env.pm b/lib/TAP/Harness/Env.pm
@@ -57,7 +57,7 @@ sub create {
 	my $package = shift;
     my %input = %{ shift || {} };
 
-    my @libs         = @{ delete $input{libs}     || [] };
+    my @libs         = @{ delete $input{lib}      || [] };
     my @raw_switches = @{ delete $input{switches} || [] };
     my @opt
       = ( @raw_switches, shellwords( $ENV{HARNESS_PERL_SWITCHES} || '' ) );