Upgrade Test::Simple from version 1.302111 to 1.302113
authorSteve Hay <steve.m.hay@googlemail.com>
Tue, 21 Nov 2017 08:26:22 +0000 (08:26 +0000)
committerSteve Hay <steve.m.hay@googlemail.com>
Tue, 21 Nov 2017 08:26:22 +0000 (08:26 +0000)
64 files changed:
Porting/Maintainers.pl
cpan/Test-Simple/lib/Test/Builder.pm
cpan/Test-Simple/lib/Test/Builder/Formatter.pm
cpan/Test-Simple/lib/Test/Builder/Module.pm
cpan/Test-Simple/lib/Test/Builder/Tester.pm
cpan/Test-Simple/lib/Test/Builder/Tester/Color.pm
cpan/Test-Simple/lib/Test/Builder/TodoDiag.pm
cpan/Test-Simple/lib/Test/More.pm
cpan/Test-Simple/lib/Test/Simple.pm
cpan/Test-Simple/lib/Test/Tester.pm
cpan/Test-Simple/lib/Test/Tester/Capture.pm
cpan/Test-Simple/lib/Test/Tester/CaptureRunner.pm
cpan/Test-Simple/lib/Test/Tester/Delegate.pm
cpan/Test-Simple/lib/Test/use/ok.pm
cpan/Test-Simple/lib/Test2.pm
cpan/Test-Simple/lib/Test2/API.pm
cpan/Test-Simple/lib/Test2/API/Breakage.pm
cpan/Test-Simple/lib/Test2/API/Context.pm
cpan/Test-Simple/lib/Test2/API/Instance.pm
cpan/Test-Simple/lib/Test2/API/Stack.pm
cpan/Test-Simple/lib/Test2/Event.pm
cpan/Test-Simple/lib/Test2/Event/Bail.pm
cpan/Test-Simple/lib/Test2/Event/Diag.pm
cpan/Test-Simple/lib/Test2/Event/Encoding.pm
cpan/Test-Simple/lib/Test2/Event/Exception.pm
cpan/Test-Simple/lib/Test2/Event/Fail.pm
cpan/Test-Simple/lib/Test2/Event/Generic.pm
cpan/Test-Simple/lib/Test2/Event/Note.pm
cpan/Test-Simple/lib/Test2/Event/Ok.pm
cpan/Test-Simple/lib/Test2/Event/Pass.pm
cpan/Test-Simple/lib/Test2/Event/Plan.pm
cpan/Test-Simple/lib/Test2/Event/Skip.pm
cpan/Test-Simple/lib/Test2/Event/Subtest.pm
cpan/Test-Simple/lib/Test2/Event/TAP/Version.pm
cpan/Test-Simple/lib/Test2/Event/Waiting.pm
cpan/Test-Simple/lib/Test2/EventFacet.pm
cpan/Test-Simple/lib/Test2/EventFacet/About.pm
cpan/Test-Simple/lib/Test2/EventFacet/Amnesty.pm
cpan/Test-Simple/lib/Test2/EventFacet/Assert.pm
cpan/Test-Simple/lib/Test2/EventFacet/Control.pm
cpan/Test-Simple/lib/Test2/EventFacet/Error.pm
cpan/Test-Simple/lib/Test2/EventFacet/Info.pm
cpan/Test-Simple/lib/Test2/EventFacet/Meta.pm
cpan/Test-Simple/lib/Test2/EventFacet/Parent.pm
cpan/Test-Simple/lib/Test2/EventFacet/Plan.pm
cpan/Test-Simple/lib/Test2/EventFacet/Trace.pm
cpan/Test-Simple/lib/Test2/Formatter.pm
cpan/Test-Simple/lib/Test2/Formatter/TAP.pm
cpan/Test-Simple/lib/Test2/Hub.pm
cpan/Test-Simple/lib/Test2/Hub/Interceptor.pm
cpan/Test-Simple/lib/Test2/Hub/Interceptor/Terminator.pm
cpan/Test-Simple/lib/Test2/Hub/Subtest.pm
cpan/Test-Simple/lib/Test2/IPC.pm
cpan/Test-Simple/lib/Test2/IPC/Driver.pm
cpan/Test-Simple/lib/Test2/IPC/Driver/Files.pm
cpan/Test-Simple/lib/Test2/Tools/Tiny.pm
cpan/Test-Simple/lib/Test2/Util.pm
cpan/Test-Simple/lib/Test2/Util/ExternalMeta.pm
cpan/Test-Simple/lib/Test2/Util/Facets2Legacy.pm
cpan/Test-Simple/lib/Test2/Util/HashBase.pm
cpan/Test-Simple/lib/Test2/Util/Trace.pm
cpan/Test-Simple/lib/ok.pm
cpan/Test-Simple/t/Test2/behavior/ipc_wait_timeout.t
cpan/Test-Simple/t/Test2/regression/gh_16.t

index 19c123c..15e6aa4 100755 (executable)
@@ -1071,7 +1071,7 @@ use File::Glob qw(:case);
     },
 
     'Test::Simple' => {
-        'DISTRIBUTION' => 'EXODIST/Test-Simple-1.302111.tar.gz',
+        'DISTRIBUTION' => 'EXODIST/Test-Simple-1.302113.tar.gz',
         'FILES'        => q[cpan/Test-Simple],
         'EXCLUDED'     => [
             qr{^examples/},
@@ -1082,7 +1082,6 @@ use File::Glob qw(:case);
                 t/zzz-check-breaks.t
                 ),
         ],
-
     },
 
     'Text::Abbrev' => {
index 41d5cbb..dc2ddc6 100644 (file)
@@ -4,7 +4,7 @@ use 5.006;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 BEGIN {
     if( $] < 5.008 ) {
index 35fa133..a828d21 100644 (file)
@@ -2,7 +2,7 @@ package Test::Builder::Formatter;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 BEGIN { require Test2::Formatter::TAP; our @ISA = qw(Test2::Formatter::TAP) }
 
index adc010c..8b8da61 100644 (file)
@@ -7,7 +7,7 @@ use Test::Builder;
 require Exporter;
 our @ISA = qw(Exporter);
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 =head1 NAME
index 9168df0..9d885af 100644 (file)
@@ -1,7 +1,7 @@
 package Test::Builder::Tester;
 
 use strict;
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 use Test::Builder;
 use Symbol;
index 049d286..8b7cde1 100644 (file)
@@ -1,7 +1,7 @@
 package Test::Builder::Tester::Color;
 
 use strict;
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 require Test::Builder::Tester;
 
index 5a783c4..b4c6d2e 100644 (file)
@@ -2,7 +2,7 @@ package Test::Builder::TodoDiag;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 BEGIN { require Test2::Event::Diag; our @ISA = qw(Test2::Event::Diag) }
 
index 15cb6a5..25237e8 100644 (file)
@@ -17,7 +17,7 @@ sub _carp {
     return warn @_, " at $file line $line\n";
 }
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 use Test::Builder::Module;
 our @ISA    = qw(Test::Builder::Module);
index 9001153..20c49ac 100644 (file)
@@ -4,7 +4,7 @@ use 5.006;
 
 use strict;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 use Test::Builder::Module;
 our @ISA    = qw(Test::Builder::Module);
index cc48ac7..81c3aed 100644 (file)
@@ -18,7 +18,7 @@ require Exporter;
 
 use vars qw( @ISA @EXPORT );
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 @EXPORT = qw( run_tests check_tests check_test cmp_results show_space );
 @ISA = qw( Exporter );
index d9b7fe0..a403861 100644 (file)
@@ -2,7 +2,7 @@ use strict;
 
 package Test::Tester::Capture;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 use Test::Builder;
index 3ae6409..54a7064 100644 (file)
@@ -3,7 +3,7 @@ use strict;
 
 package Test::Tester::CaptureRunner;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 use Test::Tester::Capture;
index 0ae2e93..88f3493 100644 (file)
@@ -3,7 +3,7 @@ use warnings;
 
 package Test::Tester::Delegate;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 use Scalar::Util();
 
index 2a3d45c..33ece84 100644 (file)
@@ -1,7 +1,7 @@
 package Test::use::ok;
 use 5.005;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 __END__
index 9526cd5..dc604e5 100644 (file)
@@ -2,7 +2,7 @@ package Test2;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 1;
index b2eeb2c..ea9199a 100644 (file)
@@ -9,7 +9,7 @@ BEGIN {
     $ENV{TEST2_ACTIVE} = 1;
 }
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 my $INST;
index d4b9eaf..75120bc 100644 (file)
@@ -2,7 +2,7 @@ package Test2::API::Breakage;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 use Test2::Util qw/pkg_to_file/;
index 76fecba..e3cf0bc 100644 (file)
@@ -2,7 +2,7 @@ package Test2::API::Context;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 use Carp qw/confess croak/;
index 0f415f6..f0fc711 100644 (file)
@@ -2,7 +2,7 @@ package Test2::API::Instance;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 our @CARP_NOT = qw/Test2::API Test2::API::Instance Test2::IPC::Driver Test2::Formatter/;
index 28f1506..e0fc191 100644 (file)
@@ -2,7 +2,7 @@ package Test2::API::Stack;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 use Test2::Hub();
index b5bda0f..a85690c 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 use Test2::Util::HashBase qw/trace -amnesty/;
 use Test2::Util::ExternalMeta qw/meta get_meta set_meta delete_meta/;
index 898a41a..e7577a0 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Bail;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
index 19bd63f..2c2d686 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Diag;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
index e048799..9ad4eda 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Encoding;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 use Carp qw/croak/;
 
index 8c4f4e3..3bcb7a8 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Exception;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
index ff028ff..98cad31 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Fail;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 use Test2::EventFacet::Info;
 
index d1ccbbe..f3ffe33 100644 (file)
@@ -5,7 +5,7 @@ use warnings;
 use Carp qw/croak/;
 use Scalar::Util qw/reftype/;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
 use Test2::Util::HashBase;
index d68b258..76f3c06 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Note;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
index fc522d4..924136f 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Ok;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
index 4e76571..744eff7 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Pass;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 use Test2::EventFacet::Info;
 
index f782b20..8e4d646 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Plan;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
index 1372ee6..4c28c31 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Skip;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 BEGIN { require Test2::Event::Ok; our @ISA = qw(Test2::Event::Ok) }
index 21a36b5..8678a9d 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Subtest;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 BEGIN { require Test2::Event::Ok; our @ISA = qw(Test2::Event::Ok) }
 use Test2::Util::HashBase qw{subevents buffered subtest_id};
index b0f12a6..7a81df3 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::TAP::Version;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 use Carp qw/croak/;
 
index f324b6f..a9234b2 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Waiting;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
index 51cd667..7d60570 100644 (file)
@@ -2,7 +2,7 @@ package Test2::EventFacet;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 use Test2::Util::HashBase qw/-details/;
 use Carp qw/croak/;
index 6cec409..458de12 100644 (file)
@@ -2,7 +2,7 @@ package Test2::EventFacet::About;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 BEGIN { require Test2::EventFacet; our @ISA = qw(Test2::EventFacet) }
 use Test2::Util::HashBase qw{ -package -no_display };
index c18ab5b..020c885 100644 (file)
@@ -2,7 +2,7 @@ package Test2::EventFacet::Amnesty;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 sub is_list { 1 }
 
index 3293c1c..6aec9ad 100644 (file)
@@ -2,7 +2,7 @@ package Test2::EventFacet::Assert;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 BEGIN { require Test2::EventFacet; our @ISA = qw(Test2::EventFacet) }
 use Test2::Util::HashBase qw{ -pass -no_debug -number };
index 8c44f1d..9d47b16 100644 (file)
@@ -2,7 +2,7 @@ package Test2::EventFacet::Control;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 BEGIN { require Test2::EventFacet; our @ISA = qw(Test2::EventFacet) }
 use Test2::Util::HashBase qw{ -global -terminate -halt -has_callback -encoding };
index 6804b8b..19607c7 100644 (file)
@@ -2,7 +2,7 @@ package Test2::EventFacet::Error;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 sub facet_key { 'errors' }
 sub is_list { 1 }
index 74b77e8..2b113c5 100644 (file)
@@ -2,7 +2,7 @@ package Test2::EventFacet::Info;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 sub is_list { 1 }
 
index 7246145..079fcfd 100644 (file)
@@ -2,7 +2,7 @@ package Test2::EventFacet::Meta;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 BEGIN { require Test2::EventFacet; our @ISA = qw(Test2::EventFacet) }
 use vars qw/$AUTOLOAD/;
index 403f569..fe7fdf1 100644 (file)
@@ -2,7 +2,7 @@ package Test2::EventFacet::Parent;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 use Carp qw/confess/;
 
index dd16540..8d093c4 100644 (file)
@@ -2,7 +2,7 @@ package Test2::EventFacet::Plan;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 BEGIN { require Test2::EventFacet; our @ISA = qw(Test2::EventFacet) }
 use Test2::Util::HashBase qw{ -count -skip -none };
index e42b760..891e844 100644 (file)
@@ -2,7 +2,7 @@ package Test2::EventFacet::Trace;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 BEGIN { require Test2::EventFacet; our @ISA = qw(Test2::EventFacet) }
 
index 453d1a6..da79839 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Formatter;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 my %ADDED;
index 5162c33..5f68330 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Formatter::TAP;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 use Test2::Util qw/clone_io/;
 
index e644441..27e6e73 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Hub;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 use Carp qw/carp croak confess/;
index 4c7aff2..cb300a1 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Hub::Interceptor;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 use Test2::Hub::Interceptor::Terminator();
index d6e0d95..66419a2 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Hub::Interceptor::Terminator;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 1;
index 950b955..5b3c368 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Hub::Subtest;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 BEGIN { require Test2::Hub; our @ISA = qw(Test2::Hub) }
 use Test2::Util::HashBase qw/nested exit_code manual_skip_all/;
index 9e15afb..aa692dd 100644 (file)
@@ -2,7 +2,7 @@ package Test2::IPC;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 use Test2::API::Instance;
index bd03371..196621c 100644 (file)
@@ -2,7 +2,7 @@ package Test2::IPC::Driver;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 use Carp qw/confess/;
index 76c3149..74c4a72 100644 (file)
@@ -2,7 +2,7 @@ package Test2::IPC::Driver::Files;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 BEGIN { require Test2::IPC::Driver; our @ISA = qw(Test2::IPC::Driver) }
index 20ee127..40aeade 100644 (file)
@@ -16,7 +16,7 @@ use Test2::API qw/context run_subtest test2_stack/;
 use Test2::Hub::Interceptor();
 use Test2::Hub::Interceptor::Terminator();
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 BEGIN { require Exporter; our @ISA = qw(Exporter) }
 our @EXPORT = qw{
index e2f8a0b..638d25b 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Util;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 use POSIX();
 use Config qw/%Config/;
index c707510..9088c4e 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Util::ExternalMeta;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 
 use Carp qw/croak/;
index b677593..09992bd 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Util::Facets2Legacy;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 use Carp qw/croak confess/;
 use Scalar::Util qw/blessed/;
index f57a7c7..7e97284 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Util::HashBase;
 use strict;
 use warnings;
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 #################################################################
 #                                                               #
index ea2d3ec..e4f2d55 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Util::Trace;
 require Test2::EventFacet::Trace;
 @ISA = ('Test2::EventFacet::Trace');
 
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 1;
 
index 55f1389..74133e8 100644 (file)
@@ -1,5 +1,5 @@
 package ok;
-our $VERSION = '1.302111';
+our $VERSION = '1.302113';
 
 use strict;
 use Test::More ();
index 82a1f8f..83fb1b0 100644 (file)
@@ -3,10 +3,13 @@ use warnings;
 
 # The things done in this test can trigger a buggy return value on some
 # platforms. This prevents that. The harness should catch actual failures. If
-# no harness is active then we will NOT sanitize the exit value, false fails ar
-# ebetter than false passes.
+# no harness is active then we will NOT sanitize the exit value, false fails
+# are better than false passes.
 END { $? = 0 if $ENV{HARNESS_ACTIVE} }
 
+# Some platforms throw a sigpipe in this test, we can ignore it.
+BEGIN { $SIG{PIPE} = 'IGNORE' }
+
 BEGIN { local ($@, $?, $!); eval { require threads } }
 use Test2::Tools::Tiny;
 use Test2::Util qw/CAN_THREAD CAN_REALLY_FORK/;
@@ -15,7 +18,7 @@ use Test2::API qw/test2_ipc_set_timeout test2_ipc_get_timeout/;
 
 my $plan = 2;
 $plan += 2 if CAN_REALLY_FORK;
-$plan += 2 if CAN_THREAD;
+$plan += 2 if CAN_THREAD && threads->can('is_joinable');
 plan $plan;
 
 is(test2_ipc_get_timeout(), 30, "got default timeout");
index a2d46f2..85e42c6 100644 (file)
@@ -1,6 +1,18 @@
 use strict;
 use warnings;
 
+# This test checks for a pretty rare condition, one that was mainly a problem
+# on 5.20+ (though a 5.8 also had the problem). I am not too worried about this
+# breaking again. That said I still want it run on newer perls (where it is
+# less likely to fail for an unrelated reason) and when I have AUTHOR_TESTING
+# set.
+BEGIN {
+    unless($ENV{AUTHOR_TESTING} || eval "no warnings 'portable'; require 5.20; 1") {
+        print "1..0 # Skip Crazy test, only run on 5.20+, or when AUTHOR_TESTING is set\n";
+        exit 0;
+    }
+}
+
 # This test is for gh #16
 # Also see https://rt.perl.org/Public/Bug/Display.html?id=127774