File tree Expand file tree Collapse file tree 27 files changed +54
-0
lines changed Expand file tree Collapse file tree 27 files changed +54
-0
lines changed Original file line number Diff line number Diff line change @@ -8,6 +8,8 @@ use Test2::Harness::Util::File::JSONL;
8
8
9
9
use Test2::Harness::Util::JSON qw/ decode_json/ ;
10
10
11
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
12
+
11
13
my $dir = __FILE__ ;
12
14
$dir =~ s {\. t$} {} g ;
13
15
$dir =~ s { ^\. /} {} ;
Original file line number Diff line number Diff line change @@ -5,6 +5,8 @@ use File::Temp qw/tempdir/;
5
5
use Test2::Harness::Util::File::JSONL;
6
6
7
7
use Test2::Harness::Util::JSON qw/ decode_json/ ;
8
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
9
+
8
10
9
11
my $dir = __FILE__ ;
10
12
$dir =~ s {\. t$} {} g ;
Original file line number Diff line number Diff line change @@ -7,6 +7,8 @@ use App::Yath::Tester qw/yath/;
7
7
use Test2::Harness::Util::File::JSONL;
8
8
9
9
use Test2::Harness::Util::JSON qw/ decode_json/ ;
10
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
11
+
10
12
11
13
my $dir = __FILE__ ;
12
14
$dir =~ s {\. t$} {} g ;
Original file line number Diff line number Diff line change @@ -7,6 +7,8 @@ use App::Yath::Tester qw/yath/;
7
7
my $dir = __FILE__ ;
8
8
$dir =~ s {\. t$} {} g ;
9
9
$dir =~ s { ^\. /} {} ;
10
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
11
+
10
12
11
13
my %CUSTOM = (
12
14
" timeout.tx" => [' --et' , 2],
Original file line number Diff line number Diff line change @@ -6,6 +6,8 @@ use File::Spec;
6
6
use App::Yath::Tester qw/ yath/ ;
7
7
use App::Yath::Util qw/ find_yath/ ;
8
8
9
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
10
+
9
11
yath(
10
12
command => ' help' ,
11
13
args => [],
Original file line number Diff line number Diff line change @@ -5,6 +5,8 @@ use File::Spec;
5
5
6
6
use App::Yath::Tester qw/ yath/ ;
7
7
8
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
9
+
8
10
use App::Yath::Util qw/ find_yath/ ;
9
11
find_yath(); # cache result before we chdir
10
12
Original file line number Diff line number Diff line change @@ -4,6 +4,8 @@ use File::Temp qw/tempdir/;
4
4
use File::Spec;
5
5
use Cwd qw/ cwd/ ;
6
6
7
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
8
+
7
9
use App::Yath::Tester qw/ yath/ ;
8
10
use App::Yath::Util qw/ find_yath/ ;
9
11
find_yath(); # cache result before we chdir
Original file line number Diff line number Diff line change @@ -4,6 +4,8 @@ use App::Yath::Tester qw/yath/;
4
4
use File::Temp qw/ tempdir/ ;
5
5
6
6
use File::Spec;
7
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
8
+
7
9
8
10
my $dir = __FILE__ ;
9
11
$dir =~ s {\. t$} {} g ;
Original file line number Diff line number Diff line change @@ -6,6 +6,8 @@ use File::Spec;
6
6
7
7
use App::Yath::Tester qw/ yath/ ;
8
8
use Test2::Harness::Util::File::JSONL;
9
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
10
+
9
11
10
12
use Test2::Harness::Util::JSON qw/ decode_json/ ;
11
13
Original file line number Diff line number Diff line change @@ -4,6 +4,8 @@ use Test2::V0;
4
4
use App::Yath::Tester qw/ yath/ ;
5
5
use File::Temp qw/ tempdir/ ;
6
6
use Test2::Harness::Util::File::JSONL;
7
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
8
+
7
9
8
10
use Test2::Harness::Util::JSON qw/ decode_json/ ;
9
11
Original file line number Diff line number Diff line change @@ -11,6 +11,8 @@ use Test2::Harness::Util::JSON qw/decode_json/;
11
11
12
12
use Test2::Util qw/ CAN_REALLY_FORK/ ;
13
13
14
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
15
+
14
16
skip_all " Cannot fork, skipping preload test"
15
17
unless CAN_REALLY_FORK;
16
18
Original file line number Diff line number Diff line change @@ -11,6 +11,8 @@ use Test2::Harness::Util::File::JSONL;
11
11
12
12
use Test2::Harness::Util::JSON qw/ decode_json/ ;
13
13
14
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
15
+
14
16
my $dir = __FILE__ ;
15
17
$dir =~ s {\. t$} {} g ;
16
18
$dir =~ s { ^\. /} {} ;
Original file line number Diff line number Diff line change @@ -2,6 +2,8 @@ use Test2::V0;
2
2
# HARNESS-DURATION-LONG
3
3
# use Test2::Plugin::DieOnFail;
4
4
5
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
6
+
5
7
use File::Temp qw/ tempdir/ ;
6
8
use File::Spec;
7
9
Original file line number Diff line number Diff line change @@ -11,6 +11,8 @@ use Test2::Harness::Util qw/clean_path/;
11
11
12
12
use Test2::Harness::Util::JSON qw/ decode_json/ ;
13
13
14
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
15
+
14
16
use Test2::Util qw/ CAN_REALLY_FORK/ ;
15
17
skip_all " Cannot fork, skipping preload test"
16
18
if $ENV {T2_NO_FORK } || !CAN_REALLY_FORK;
Original file line number Diff line number Diff line change @@ -5,6 +5,8 @@ use File::Spec;
5
5
6
6
use App::Yath::Tester qw/ yath/ ;
7
7
use Test2::Harness::Util::File::JSONL;
8
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
9
+
8
10
9
11
use Test2::Harness::Util::JSON qw/ decode_json/ ;
10
12
Original file line number Diff line number Diff line change @@ -8,6 +8,8 @@ use Test2::Harness::Util::File::JSONL;
8
8
9
9
use Test2::Harness::Util::JSON qw/ decode_json/ ;
10
10
11
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
12
+
11
13
my $dir = __FILE__ ;
12
14
$dir =~ s {\. t$} {} g ;
13
15
$dir =~ s { ^\. /} {} ;
Original file line number Diff line number Diff line change @@ -7,6 +7,8 @@ my $dir = __FILE__;
7
7
$dir =~ s {\. t$} {} g ;
8
8
$dir =~ s { ^\. /} {} ;
9
9
10
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
11
+
10
12
my $project = " asgadfgds" ;
11
13
12
14
run_tests(' test' );
Original file line number Diff line number Diff line change @@ -8,6 +8,8 @@ use Test2::Harness::Util::File::JSONL;
8
8
9
9
use Test2::Harness::Util::JSON qw/ decode_json/ ;
10
10
11
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
12
+
11
13
my $dir = __FILE__ ;
12
14
$dir =~ s {\. t$} {} g ;
13
15
$dir =~ s { ^\. /} {} ;
Original file line number Diff line number Diff line change @@ -11,6 +11,8 @@ my $dir = __FILE__;
11
11
$dir =~ s {\. t$} {} g ;
12
12
$dir =~ s { ^\. /} {} ;
13
13
14
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
15
+
14
16
for ( 1..10 ) {
15
17
# the tests are flapping when using something like '%INC = %INC'....
16
18
# make sure the issue is fixed by running them a few times
Original file line number Diff line number Diff line change @@ -7,6 +7,8 @@ use App::Yath::Tester qw/yath/;
7
7
use Test2::Harness::Util::File::JSONL;
8
8
9
9
use Test2::Harness::Util::JSON qw/ decode_json/ ;
10
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
11
+
10
12
11
13
my $dir = __FILE__ ;
12
14
$dir =~ s {\. t$} {} g ;
Original file line number Diff line number Diff line change @@ -7,6 +7,8 @@ use File::Copy qw/copy/;
7
7
use Test2::Harness::Util::File::JSONL;
8
8
9
9
use App::Yath::Tester qw/ yath/ ;
10
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
11
+
10
12
11
13
use App::Yath::Util qw/ find_yath/ ;
12
14
find_yath(); # cache result before we chdir
Original file line number Diff line number Diff line change @@ -7,6 +7,8 @@ use App::Yath::Tester qw/yath/;
7
7
use Test2::Harness::Util::File::JSONL;
8
8
9
9
use Test2::Harness::Util::JSON qw/ decode_json/ ;
10
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
11
+
10
12
11
13
my $dir = __FILE__ ;
12
14
$dir =~ s {\. t$} {} g ;
Original file line number Diff line number Diff line change 1
1
use Test2::V0;
2
2
3
3
use App::Yath::Tester qw/ yath/ ;
4
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
5
+
4
6
5
7
my $dir = __FILE__ ;
6
8
$dir =~ s {\. t$} {} g ;
Original file line number Diff line number Diff line change 1
1
use Test2::V0;
2
2
3
3
use App::Yath::Tester qw/ yath/ ;
4
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
5
+
4
6
5
7
my $dir = __FILE__ ;
6
8
$dir =~ s {\. t$} {} g ;
Original file line number Diff line number Diff line change @@ -9,6 +9,8 @@ use Test2::Harness::Util::File::JSONL;
9
9
10
10
use Test2::Harness::Util qw/ clean_path/ ;
11
11
use Test2::Harness::Util::JSON qw/ decode_json/ ;
12
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
13
+
12
14
13
15
my $dir = __FILE__ ;
14
16
$dir =~ s {\. t$} {} g ;
Original file line number Diff line number Diff line change 1
1
use Test2::V0;
2
2
3
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
4
+
3
5
use File::Temp qw/ tempdir/ ;
4
6
use File::Spec;
5
7
Original file line number Diff line number Diff line change 1
1
use Test2::V0;
2
2
3
+ use Test2::Plugin::Immiscible(sub { $ENV {TEST2_HARNESS_ACTIVE } ? 1 : 0 });
4
+
3
5
use Config qw/ %Config/ ;
4
6
use File::Temp qw/ tempfile/ ;
5
7
use File::Spec;
You can’t perform that action at this time.
0 commit comments