Skip to content
This repository was archived by the owner on Jun 1, 2023. It is now read-only.

Commit 36cb323

Browse files
committed
Test-Harness: fix 2 tests for HARNESS_VERBOSE
failed with HARNESS_VERBOSE set
1 parent 33f6f7f commit 36cb323

File tree

4 files changed

+11
-0
lines changed

4 files changed

+11
-0
lines changed

Porting/Maintainers.pl

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1367,13 +1367,17 @@ package Maintainers;
13671367
),
13681368
],
13691369
# with compiled Config
1370+
# insensitive to HARNESS_VERBOSE
13701371
'CUSTOMIZED' => [
13711372
qw( t/multiplexer.t
13721373
t/nofork.t
13731374
t/regression.t
13741375
t/sample-tests/switches
13751376
t/source_handler.t
13761377
t/lib/NoFork.pm
1378+
1379+
t/compat/env.t
1380+
t/compat/inc-propagation.t
13771381
)],
13781382
},
13791383

cpan/Test-Harness/t/compat/env.t

Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -12,6 +12,8 @@ use Test::More (
1212
: ( tests => 1 )
1313
);
1414

15+
local $ENV{HARNESS_VERBOSE};
16+
BEGIN { undef $ENV{HARNESS_VERBOSE}; }
1517
use Test::Harness;
1618

1719
# HARNESS_PERL_SWITCHES
@@ -32,6 +34,7 @@ END { unlink 'env_check_t.tmp'; }
3234

3335
{
3436
local $ENV{HARNESS_PERL_SWITCHES} = '-w';
37+
local $ENV{HARNESS_VERBOSE};
3538
my ( $tot, $failed )
3639
= Test::Harness::execute_tests( tests => ['env_check_t.tmp'] );
3740
is $tot->{bad}, 0;

cpan/Test-Harness/t/compat/inc-propagation.t

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -10,6 +10,8 @@ use Config;
1010

1111
local
1212
$ENV{PERL5OPT}; # avoid any user-provided PERL5OPT from contaminating @INC
13+
local $ENV{HARNESS_VERBOSE};
14+
BEGIN { undef $ENV{HARNESS_VERBOSE}; }
1315

1416
sub has_crazy_patch {
1517
my $sentinel = 'blirpzoffle';

t/porting/customized.dat

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -114,6 +114,8 @@ Search::Dict dist/Search-Dict/lib/Search/Dict.pm 1a896da1e51d5ab18227b2c28793a37
114114
Sys::Syslog cpan/Sys-Syslog/t/syslog.t bed4da2de76558f92d354bb83dc01fd7d66cadec
115115
Term::ReadKey cpan/Term-ReadKey/ReadKey.xs 59b64457d07717565ab7f5163743685f77bb5f4c
116116
Term::ReadKey cpan/Term-ReadKey/t/02_terminal_functions.t b17051b192850c2fce14842f2f469e1ac1895c4d
117+
Test::Harness cpan/Test-Harness/t/compat/env.t 2632a5e4226e8fac52a051f37952a79326b8c51f
118+
Test::Harness cpan/Test-Harness/t/compat/inc-propagation.t b006872243d82ffd447e99ff241b6287c6aed36c
117119
Test::Harness cpan/Test-Harness/t/lib/NoFork.pm e96d39d98c176745a317e2d178713708f03e8cae
118120
Test::Harness cpan/Test-Harness/t/multiplexer.t 059fbbd8529bf73ba0615272ee85f1706cae734d
119121
Test::Harness cpan/Test-Harness/t/nofork.t 17a1bde6de588ca647cd89d3786e84a68164a45c

0 commit comments

Comments
 (0)