This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Update Test-Simple to CPAN version 1.302073
authorChris 'BinGOs' Williams <chris@bingosnet.co.uk>
Mon, 19 Dec 2016 09:26:24 +0000 (09:26 +0000)
committerChris 'BinGOs' Williams <chris@bingosnet.co.uk>
Mon, 19 Dec 2016 09:34:01 +0000 (09:34 +0000)
98 files changed:
MANIFEST
Makefile.SH
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/Generic.pm
cpan/Test-Simple/lib/Test2/Event/Info.pm
cpan/Test-Simple/lib/Test2/Event/Note.pm
cpan/Test-Simple/lib/Test2/Event/Ok.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/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 [moved from cpan/Test-Simple/t/tools.pl with 56% similarity]
cpan/Test-Simple/lib/Test2/Util.pm
cpan/Test-Simple/lib/Test2/Util/ExternalMeta.pm
cpan/Test-Simple/lib/Test2/Util/Trace.pm
cpan/Test-Simple/lib/ok.pm
cpan/Test-Simple/t/Legacy_And_Test2/builder_loaded_late.t
cpan/Test-Simple/t/Legacy_And_Test2/hidden_warnings.t
cpan/Test-Simple/t/Test2/behavior/Formatter.t
cpan/Test-Simple/t/Test2/behavior/Subtest_buffer_formatter.t
cpan/Test-Simple/t/Test2/behavior/Subtest_events.t
cpan/Test-Simple/t/Test2/behavior/Subtest_plan.t
cpan/Test-Simple/t/Test2/behavior/Subtest_todo.t
cpan/Test-Simple/t/Test2/behavior/err_var.t
cpan/Test-Simple/t/Test2/behavior/init_croak.t
cpan/Test-Simple/t/Test2/behavior/nested_context_exception.t
cpan/Test-Simple/t/Test2/behavior/no_load_api.t
cpan/Test-Simple/t/Test2/behavior/run_subtest_inherit.t
cpan/Test-Simple/t/Test2/behavior/special_names.t
cpan/Test-Simple/t/Test2/legacy/TAP.t
cpan/Test-Simple/t/Test2/modules/API.t
cpan/Test-Simple/t/Test2/modules/API/Breakage.t
cpan/Test-Simple/t/Test2/modules/API/Context.t
cpan/Test-Simple/t/Test2/modules/API/Instance.t
cpan/Test-Simple/t/Test2/modules/API/Stack.t
cpan/Test-Simple/t/Test2/modules/Event.t
cpan/Test-Simple/t/Test2/modules/Event/Bail.t
cpan/Test-Simple/t/Test2/modules/Event/Diag.t
cpan/Test-Simple/t/Test2/modules/Event/Exception.t
cpan/Test-Simple/t/Test2/modules/Event/Generic.t
cpan/Test-Simple/t/Test2/modules/Event/Info.t
cpan/Test-Simple/t/Test2/modules/Event/Note.t
cpan/Test-Simple/t/Test2/modules/Event/Ok.t
cpan/Test-Simple/t/Test2/modules/Event/Plan.t
cpan/Test-Simple/t/Test2/modules/Event/Skip.t
cpan/Test-Simple/t/Test2/modules/Event/Subtest.t
cpan/Test-Simple/t/Test2/modules/Event/Waiting.t
cpan/Test-Simple/t/Test2/modules/Formatter/TAP.t
cpan/Test-Simple/t/Test2/modules/Hub.t
cpan/Test-Simple/t/Test2/modules/Hub/Interceptor.t
cpan/Test-Simple/t/Test2/modules/Hub/Interceptor/Terminator.t
cpan/Test-Simple/t/Test2/modules/Hub/Subtest.t
cpan/Test-Simple/t/Test2/modules/IPC.t
cpan/Test-Simple/t/Test2/modules/IPC/Driver.t
cpan/Test-Simple/t/Test2/modules/IPC/Driver/Files.t
cpan/Test-Simple/t/Test2/modules/Tools/Tiny.t [moved from cpan/Test-Simple/t/tools.t with 99% similarity]
cpan/Test-Simple/t/Test2/modules/Util.t
cpan/Test-Simple/t/Test2/modules/Util/ExternalMeta.t
cpan/Test-Simple/t/Test2/modules/Util/Trace.t
cpan/Test-Simple/t/Test2/regression/693_ipc_ordering.t
cpan/Test-Simple/t/Test2/regression/ipc_files_abort_exit.t
cpan/Test-Simple/t/regression/696-intercept_skip_all.t
cpan/Test-Simple/t/regression/721-nested-streamed-subtest.t
cpan/Test-Simple/t/regression/no_name_in_subtest.t

index d38f65c..714a384 100644 (file)
--- a/MANIFEST
+++ b/MANIFEST
@@ -2634,6 +2634,7 @@ 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/Transition.pod
 cpan/Test-Simple/lib/Test2/Util.pm
 cpan/Test-Simple/lib/Test2/Util/ExternalMeta.pm
@@ -2845,6 +2846,7 @@ cpan/Test-Simple/t/Test2/modules/Hub/Subtest.t
 cpan/Test-Simple/t/Test2/modules/IPC.t
 cpan/Test-Simple/t/Test2/modules/IPC/Driver.t
 cpan/Test-Simple/t/Test2/modules/IPC/Driver/Files.t
+cpan/Test-Simple/t/Test2/modules/Tools/Tiny.t
 cpan/Test-Simple/t/Test2/modules/Util.t
 cpan/Test-Simple/t/Test2/modules/Util/ExternalMeta.t
 cpan/Test-Simple/t/Test2/modules/Util/HashBase.t
@@ -2852,8 +2854,6 @@ cpan/Test-Simple/t/Test2/modules/Util/Trace.t
 cpan/Test-Simple/t/Test2/regression/693_ipc_ordering.t
 cpan/Test-Simple/t/Test2/regression/gh_16.t
 cpan/Test-Simple/t/Test2/regression/ipc_files_abort_exit.t
-cpan/Test-Simple/t/tools.pl
-cpan/Test-Simple/t/tools.t
 cpan/Text-Balanced/lib/Text/Balanced.pm        Text::Balanced
 cpan/Text-Balanced/t/01_compile.t      See if Text::Balanced works
 cpan/Text-Balanced/t/02_extbrk.t       See if Text::Balanced works
index 963d205..33befde 100755 (executable)
@@ -1349,12 +1349,12 @@ _cleaner2:
        -rmdir lib/autodie/exception lib/autodie/Scope lib/autodie lib/XS
        -rmdir lib/Win32API lib/VMS lib/Unicode/Collate/Locale
        -rmdir lib/Unicode/Collate/CJK lib/Unicode/Collate lib/Tie/Hash
-       -rmdir lib/Thread lib/Text lib/Test2/Util lib/Test2/IPC/Driver
-       -rmdir lib/Test2/IPC lib/Test2/Hub/Interceptor lib/Test2/Hub
-       -rmdir lib/Test2/Formatter lib/Test2/Event/TAP lib/Test2/Event
-       -rmdir lib/Test2/API lib/Test2 lib/Test/use lib/Test/Tester
-       -rmdir lib/Test/Builder/Tester lib/Test/Builder/IO lib/Test/Builder
-       -rmdir lib/Test lib/Term lib/TAP/Parser/YAMLish
+       -rmdir lib/Thread lib/Text lib/Test2/Util lib/Test2/Tools
+       -rmdir lib/Test2/IPC/Driver lib/Test2/IPC lib/Test2/Hub/Interceptor
+       -rmdir lib/Test2/Hub lib/Test2/Formatter lib/Test2/Event/TAP
+       -rmdir lib/Test2/Event lib/Test2/API lib/Test2 lib/Test/use
+       -rmdir lib/Test/Tester lib/Test/Builder/Tester lib/Test/Builder/IO
+       -rmdir lib/Test/Builder lib/Test lib/Term lib/TAP/Parser/YAMLish
        -rmdir lib/TAP/Parser/SourceHandler lib/TAP/Parser/Scheduler
        -rmdir lib/TAP/Parser/Result lib/TAP/Parser/Iterator lib/TAP/Parser
        -rmdir lib/TAP/Harness lib/TAP/Formatter/File
index a097472..00774d5 100755 (executable)
@@ -1166,7 +1166,7 @@ use File::Glob qw(:case);
     },
 
     'Test::Simple' => {
-        'DISTRIBUTION' => 'EXODIST/Test-Simple-1.302067.tar.gz',
+        'DISTRIBUTION' => 'EXODIST/Test-Simple-1.302073.tar.gz',
         'FILES'        => q[cpan/Test-Simple],
         'EXCLUDED'     => [
             qr{^examples/},
index c21fbff..052e279 100644 (file)
@@ -4,7 +4,7 @@ use 5.006;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 BEGIN {
     if( $] < 5.008 ) {
index 3586c9f..96571c6 100644 (file)
@@ -2,7 +2,7 @@ package Test::Builder::Formatter;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 BEGIN { require Test2::Formatter::TAP; our @ISA = qw(Test2::Formatter::TAP) }
 
index 7755da5..6fbba79 100644 (file)
@@ -7,7 +7,7 @@ use Test::Builder;
 require Exporter;
 our @ISA = qw(Exporter);
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 =head1 NAME
index 46f5aec..647ea2d 100644 (file)
@@ -1,7 +1,7 @@
 package Test::Builder::Tester;
 
 use strict;
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 use Test::Builder;
 use Symbol;
index d0cff13..939e7f1 100644 (file)
@@ -1,7 +1,7 @@
 package Test::Builder::Tester::Color;
 
 use strict;
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 require Test::Builder::Tester;
 
index 31f2b4b..74ae078 100644 (file)
@@ -2,7 +2,7 @@ package Test::Builder::TodoDiag;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 BEGIN { require Test2::Event::Diag; our @ISA = qw(Test2::Event::Diag) }
 
index 9fe4d5c..2863c1b 100644 (file)
@@ -17,7 +17,7 @@ sub _carp {
     return warn @_, " at $file line $line\n";
 }
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 use Test::Builder::Module;
 our @ISA    = qw(Test::Builder::Module);
index 15b7ab1..f148fe6 100644 (file)
@@ -4,7 +4,7 @@ use 5.006;
 
 use strict;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 use Test::Builder::Module;
 our @ISA    = qw(Test::Builder::Module);
index de66efe..a324a1b 100644 (file)
@@ -18,7 +18,7 @@ require Exporter;
 
 use vars qw( @ISA @EXPORT );
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 @EXPORT = qw( run_tests check_tests check_test cmp_results show_space );
 @ISA = qw( Exporter );
index 01fef34..d8eb170 100644 (file)
@@ -2,7 +2,7 @@ use strict;
 
 package Test::Tester::Capture;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 use Test::Builder;
index 1e06d7a..bed18e8 100644 (file)
@@ -3,7 +3,7 @@ use strict;
 
 package Test::Tester::CaptureRunner;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 use Test::Tester::Capture;
index 8724e18..ed627db 100644 (file)
@@ -3,7 +3,7 @@ use warnings;
 
 package Test::Tester::Delegate;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 use Scalar::Util();
 
index ddc3a4c..fdc7326 100644 (file)
@@ -1,7 +1,7 @@
 package Test::use::ok;
 use 5.005;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 __END__
index 701b778..1b65b33 100644 (file)
@@ -2,7 +2,7 @@ package Test2;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 1;
index 3e54b2a..41cd0af 100644 (file)
@@ -7,7 +7,7 @@ BEGIN {
     $ENV{TEST2_ACTIVE} = 1;
 }
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 my $INST;
index 8e0b257..b85e4d5 100644 (file)
@@ -2,7 +2,7 @@ package Test2::API::Breakage;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 use Test2::Util qw/pkg_to_file/;
index e9844cb..7660fa6 100644 (file)
@@ -2,7 +2,7 @@ package Test2::API::Context;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 use Carp qw/confess croak longmess/;
index 4489faf..70d4cd7 100644 (file)
@@ -2,7 +2,7 @@ package Test2::API::Instance;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 our @CARP_NOT = qw/Test2::API Test2::API::Instance Test2::IPC::Driver Test2::Formatter/;
index 6b1483e..534cd78 100644 (file)
@@ -2,7 +2,7 @@ package Test2::API::Stack;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 use Test2::Hub();
index b566952..a59a366 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 use Test2::Util::HashBase qw/trace nested in_subtest subtest_id/;
 use Test2::Util::ExternalMeta qw/meta get_meta set_meta delete_meta/;
index e4bf5c7..0284aec 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Bail;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
index 6745276..9d2ba88 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Diag;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
index 0bbd93c..52af3f2 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Encoding;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
 use Test2::Util::HashBase qw/encoding/;
index 4283c74..a10ca67 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Exception;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
index 0b3901d..ad00f5a 100644 (file)
@@ -5,7 +5,7 @@ use warnings;
 use Carp qw/croak/;
 use Scalar::Util qw/reftype/;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
 use Test2::Util::HashBase;
index 4564eed..51c4bbc 100644 (file)
@@ -4,7 +4,7 @@ use warnings;
 
 use Scalar::Util qw/blessed/;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
 use Test2::Util::HashBase qw/diagnostics renderer/;
index 69cb4a4..b9a2ded 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Note;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
index 1c107d6..456d6bb 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Ok;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
index 0996b28..94b3030 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Plan;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
index 9672be7..7cca061 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Skip;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 BEGIN { require Test2::Event::Ok; our @ISA = qw(Test2::Event::Ok) }
index 6aefc0e..2b3c773 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Subtest;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 BEGIN { require Test2::Event::Ok; our @ISA = qw(Test2::Event::Ok) }
index 05ea9a5..b96a25a 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::TAP::Version;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
 use Test2::Util::HashBase qw/version/;
index 372de9e..fa87c6e 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Event::Waiting;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
index 1ad9e44..945d545 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Formatter;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 my %ADDED;
index b37d31b..680095c 100644 (file)
@@ -3,7 +3,7 @@ use strict;
 use warnings;
 require PerlIO;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 use Test2::Util::HashBase qw{
     no_numbers handles _encoding
index 20fb035..324f1a8 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Hub;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 use Carp qw/carp croak confess/;
index 036c370..42be265 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Hub::Interceptor;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 use Test2::Hub::Interceptor::Terminator();
index 785cca7..f720190 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Hub::Interceptor::Terminator;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 1;
index 5704a4f..adb3d6f 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Hub::Subtest;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 BEGIN { require Test2::Hub; our @ISA = qw(Test2::Hub) }
index 67707af..9244791 100644 (file)
@@ -2,7 +2,7 @@ package Test2::IPC;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 use Test2::API::Instance;
index 68b186c..cd34f7c 100644 (file)
@@ -2,7 +2,7 @@ package Test2::IPC::Driver;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 use Carp qw/confess longmess/;
index cdfbba5..998fef5 100644 (file)
@@ -2,7 +2,7 @@ package Test2::IPC::Driver::Files;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 BEGIN { require Test2::IPC::Driver; our @ISA = qw(Test2::IPC::Driver) }
similarity index 56%
rename from cpan/Test-Simple/t/tools.pl
rename to cpan/Test-Simple/lib/Test2/Tools/Tiny.pm
index a5afc48..857a923 100644 (file)
@@ -1,3 +1,7 @@
+package Test2::Tools::Tiny;
+use strict;
+use warnings;
+
 use Scalar::Util qw/blessed/;
 
 use Test2::Util qw/try/;
@@ -6,6 +10,14 @@ use Test2::API qw/context run_subtest test2_stack/;
 use Test2::Hub::Interceptor();
 use Test2::Hub::Interceptor::Terminator();
 
+our $VERSION = '1.302073';
+
+BEGIN { require Exporter; our @ISA = qw(Exporter) }
+our @EXPORT = qw{
+    ok is isnt like unlike is_deeply diag note skip_all todo plan done_testing
+    warnings exception tests capture
+};
+
 sub ok($;$@) {
     my ($bool, $name, @diag) = @_;
     my $ctx = context();
@@ -25,7 +37,7 @@ sub is($$;$@) {
     elsif (defined($got) xor defined($want)) {
         $bool = 0;
     }
-    else { # Both are undef
+    else {    # Both are undef
         $bool = 1;
     }
 
@@ -54,7 +66,7 @@ sub isnt($$;$@) {
     elsif (defined($got) xor defined($want)) {
         $bool = 1;
     }
-    else { # Both are undef
+    else {    # Both are undef
         $bool = 0;
     }
 
@@ -119,8 +131,8 @@ sub is_deeply($$;$@) {
     require Data::Dumper;
     local $Data::Dumper::Sortkeys = 1;
     local $Data::Dumper::Deparse  = 1;
-    local $Data::Dumper::Freezer = 'XXX';
-    local *UNIVERSAL::XXX = sub {
+    local $Data::Dumper::Freezer  = 'XXX';
+    local *UNIVERSAL::XXX         = sub {
         my ($thing) = @_;
         if (ref($thing)) {
             $thing = {%$thing}  if "$thing" =~ m/=HASH/;
@@ -136,17 +148,6 @@ sub is_deeply($$;$@) {
     my $bool = $g eq $w;
 
     my $diff;
-#    unless ($bool) {
-#        use File::Temp;
-#        my ($gFH, $fileg) = File::Temp::tempfile();
-#        my ($wFH, $filew) = File::Temp::tempfile();
-#        print $gFH $g;
-#        print $wFH $w;
-#        close($gFH) || die $!;
-#        close($wFH) || die $!;
-#        my $cmd = qq{git diff --color=always "$fileg" "$filew"};
-#        $diff = eval { `$cmd` };
-#    }
 
     $ctx->ok($bool, $name, [$diff ? $diff : ($g, $w), @diag]);
     $ctx->release;
@@ -155,13 +156,13 @@ sub is_deeply($$;$@) {
 
 sub diag {
     my $ctx = context();
-    $ctx->diag( join '', @_ );
+    $ctx->diag(join '', @_);
     $ctx->release;
 }
 
 sub note {
     my $ctx = context();
-    $ctx->note( join '', @_ );
+    $ctx->note(join '', @_);
     $ctx->release;
 }
 
@@ -173,34 +174,34 @@ sub skip_all {
 }
 
 sub todo {
-       my ($reason, $sub) = @_;
-       my $ctx = context();
-
-       # This code is mostly copied from Test2::Todo in the Test2-Suite
-       # distribution.
-       my $hub    = test2_stack->top;
-       my $filter = $hub->pre_filter(
-               sub {
-                       my ($active_hub, $event) = @_;
-
-                       # Turn a diag into a note
-                       return Test2::Event::Note->new(%$event) if ref($event) eq 'Test2::Event::Diag';
-
-                       # Set todo on ok's
-                       if ($hub == $active_hub && $event->isa('Test2::Event::Ok')) {
-                               $event->set_todo($reason);
-                               $event->set_effective_pass(1);
-                       }
-
-                       return $event;
-               },
-               inherit => 1,
-               todo    => $reason,
-       );
-       $sub->();
-       $hub->pre_unfilter($filter);
-
-       $ctx->release if $ctx;
+    my ($reason, $sub) = @_;
+    my $ctx = context();
+
+    # This code is mostly copied from Test2::Todo in the Test2-Suite
+    # distribution.
+    my $hub    = test2_stack->top;
+    my $filter = $hub->pre_filter(
+        sub {
+            my ($active_hub, $event) = @_;
+
+            # Turn a diag into a note
+            return Test2::Event::Note->new(%$event) if ref($event) eq 'Test2::Event::Diag';
+
+            # Set todo on ok's
+            if ($hub == $active_hub && $event->isa('Test2::Event::Ok')) {
+                $event->set_todo($reason);
+                $event->set_effective_pass(1);
+            }
+
+            return $event;
+        },
+        inherit => 1,
+        todo    => $reason,
+    );
+    $sub->();
+    $hub->pre_unfilter($filter);
+
+    $ctx->release if $ctx;
 }
 
 sub plan {
@@ -278,3 +279,147 @@ sub capture(&) {
 }
 
 1;
+
+__END__
+
+=pod
+
+=encoding UTF-8
+
+=head1 NAME
+
+Test2::Tools::Tiny - Tiny set of tools for unfortunate souls who cannot use
+L<Test2::Suite>.
+
+=head1 DESCRIPTION
+
+You should really look at L<Test2::Suite>. This package is some very basic
+essential tools implemented using L<Test2>. This exists only so that L<Test2>
+and other tools required by L<Test2::Suite> can be tested. This is the package
+L<Test2> uses to test itself.
+
+=head1 USE Test2::Suite INSTEAD
+
+Use L<Test2::Suite> if at all possible.
+
+=head1 EXPORTS
+
+=over 4
+
+=item ok($bool, $name)
+
+=item ok($bool, $name, @diag)
+
+Run a simple assertion.
+
+=item is($got, $want, $name)
+
+=item is($got, $want, $name, @diag)
+
+Assert that 2 strings are the same.
+
+=item isnt($got, $do_not_want, $name)
+
+=item isnt($got, $do_not_want, $name, @diag)
+
+Assert that 2 strings are not the same.
+
+=item like($got, $regex, $name)
+
+=item like($got, $regex, $name, @diag)
+
+Check that the input string matches the regex.
+
+=item unlike($got, $regex, $name)
+
+=item unlike($got, $regex, $name, @diag)
+
+Check that the input string does not match the regex.
+
+=item is_deeply($got, $want, $name)
+
+=item is_deeply($got, $want, $name, @diag)
+
+Check 2 data structures. Please note that this is a I<DUMB> implementation that
+compares the output of L<Data::Dumper> against both structures.
+
+=item diag($msg)
+
+Issue a diagnostics message to STDERR.
+
+=item note($msg)
+
+Issue a diagnostics message to STDOUT.
+
+=item skip_all($reason)
+
+Skip all tests.
+
+=item todo $reason => sub { ... }
+
+Run a block in TODO mode.
+
+=item plan($count)
+
+Set the plan.
+
+=item done_testing()
+
+Set the plan to the current test count.
+
+=item $warnings = warnings { ... }
+
+Capture an arrayref of warnings from the block.
+
+=item $exception = exception { ... }
+
+Capture an exception.
+
+=item tests $name => sub { ... }
+
+Run a subtest.
+
+=item $output = capture { ... }
+
+Capture STDOUT and STDERR output.
+
+Result looks like this:
+
+    {
+        STDOUT => "...",
+        STDERR => "...",
+    }
+
+=back
+
+=head1 SOURCE
+
+The source code repository for Test2 can be found at
+F<http://github.com/Test-More/test-more/>.
+
+=head1 MAINTAINERS
+
+=over 4
+
+=item Chad Granum E<lt>exodist@cpan.orgE<gt>
+
+=back
+
+=head1 AUTHORS
+
+=over 4
+
+=item Chad Granum E<lt>exodist@cpan.orgE<gt>
+
+=back
+
+=head1 COPYRIGHT
+
+Copyright 2016 Chad Granum E<lt>exodist@cpan.orgE<gt>.
+
+This program is free software; you can redistribute it and/or
+modify it under the same terms as Perl itself.
+
+See F<http://dev.perl.org/licenses/>
+
+=cut
index 0a23de2..53379d4 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Util;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 use Config qw/%Config/;
index bc62d7b..f9c611e 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Util::ExternalMeta;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 use Carp qw/croak/;
index 20bce56..0f10bcb 100644 (file)
@@ -2,7 +2,7 @@ package Test2::Util::Trace;
 use strict;
 use warnings;
 
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 
 use Test2::Util qw/get_tid pkg_to_file/;
index 0d82054..143885d 100644 (file)
@@ -1,5 +1,5 @@
 package ok;
-our $VERSION = '1.302071';
+our $VERSION = '1.302073';
 
 use strict;
 use Test::More ();
index 37d755b..21c712b 100644 (file)
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 use Test2::API qw/intercept/;
 
 plan 4;
index a487ab5..1819be3 100644 (file)
@@ -1,6 +1,6 @@
 use strict;
 use warnings;
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 use Test2::API qw( context_do );
 
 $SIG{__WARN__} = sub {
index 24bd6c2..f38b022 100644 (file)
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 
-BEGIN { require "t/tools.pl" }
+use Test2::Tools::Tiny;
 
 use Test2::API qw/intercept run_subtest test2_stack/;
 use Test2::Event::Bail;
index 2fc58ef..fadebf4 100644 (file)
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 
 use Test2::API qw/run_subtest intercept test2_stack/;
 
index 8113dd9..2d1dade 100644 (file)
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 
 use Test2::API qw/run_subtest intercept/;
 
index f3dab3c..f16f7c4 100644 (file)
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 
 use Test2::API qw/run_subtest intercept/;
 
index 2ee0608..cafc712 100644 (file)
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 
-BEGIN { require "t/tools.pl" }
+use Test2::Tools::Tiny;
 
 use Test2::API qw/run_subtest intercept/;
 
index 7d8bc7c..1e1bfef 100644 (file)
@@ -3,7 +3,7 @@ use warnings;
 
 use Test2::IPC;
 
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 
 {
     local $! = 100;
index e8eb44b..dc49283 100644 (file)
@@ -1,6 +1,6 @@
 use strict;
 use warnings;
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 
 BEGIN {
     package Foo::Bar;
index 04cbdb8..55db247 100644 (file)
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 BEGIN { $Test2::API::DO_DEPTH_CHECK = 1 }
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 
 use Test2::API qw/context/;
 
index 8bf54c9..8e01e40 100644 (file)
@@ -42,9 +42,9 @@ my @loaded = grep { $INC{$_} } qw{
     Test2/API/Stack.pm
 };
 
-require "t/tools.pl";
+require Test2::Tools::Tiny;
 
-ok(!@loaded, "Test2::API was not loaded")
+Test2::Tools::Tiny::ok(!@loaded, "Test2::API was not loaded")
     || diag("Loaded: " . Dumper(\@loaded));
 
-done_testing();
+Test2::Tools::Tiny::done_testing();
index 3f15bc8..5a79ee4 100644 (file)
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 
 use Test2::API qw/run_subtest intercept context/;
 
index b748cfa..4cf10e5 100644 (file)
@@ -2,7 +2,7 @@ use strict;
 use warnings;
 # HARNESS-NO-FORMATTER
 
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 
 #########################
 #
index 84bb18a..e58a5ff 100644 (file)
@@ -2,7 +2,7 @@ use strict;
 use warnings;
 # HARNESS-NO-FORMATTER
 
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 
 #########################
 #
@@ -11,11 +11,11 @@ BEGIN { require "t/tools.pl" };
 #
 #########################
 
-use Test2::API qw/test2_stack/;
+use Test2::API qw/test2_stack context/;
 use Test::Builder::Formatter;
 
-# The tools in tools.pl have some intentional differences from the Test::More
-# versions, these behave more like Test::More which is important for
+# The tools in Test2::Tools::Tiny have some intentional differences from the
+# Test::More versions, these behave more like Test::More which is important for
 # back-compat.
 sub tm_ok($;$) {
     my ($bool, $name) = @_;
index c206c04..27790aa 100644 (file)
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 
-use Test2::API;
+use Test2::API qw/context/;
 
 my ($LOADED, $INIT);
 BEGIN {
@@ -10,7 +10,7 @@ BEGIN {
 };
 
 use Test2::IPC;
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 use Test2::Util qw/get_tid/;
 my $CLASS = 'Test2::API';
 
index 2069c93..e293246 100644 (file)
@@ -2,7 +2,7 @@ use strict;
 use warnings;
 
 use Test2::IPC;
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 use Test2::API::Breakage;
 my $CLASS = 'Test2::API::Breakage';
 
index f6842f1..c0dbfc9 100644 (file)
@@ -2,7 +2,7 @@ use strict;
 use warnings;
 
 BEGIN { $Test2::API::DO_DEPTH_CHECK = 1 }
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 
 use Test2::API qw{
     context intercept
index 294224c..9e3e4cc 100644 (file)
@@ -2,7 +2,7 @@ use strict;
 use warnings;
 
 use Test2::IPC;
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 use Test2::Util qw/CAN_THREAD CAN_REALLY_FORK USE_THREADS get_tid/;
 
 my $CLASS = 'Test2::API::Instance';
index 731022e..c2016e2 100644 (file)
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 use Test2::IPC;
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 use Test2::API::Stack;
 use Test2::API qw/test2_ipc/;
 
index 323972a..467e724 100644 (file)
@@ -1,6 +1,6 @@
 use strict;
 use warnings;
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 
 use Test2::Event();
 
index 0d69f43..d323bd9 100644 (file)
@@ -1,6 +1,6 @@
 use strict;
 use warnings;
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 use Test2::Event::Bail;
 
 my $bail = Test2::Event::Bail->new(
index eb38554..9094c0a 100644 (file)
@@ -1,6 +1,6 @@
 use strict;
 use warnings;
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 use Test2::Event::Diag;
 use Test2::Util::Trace;
 
index d9082ad..b2bcb6f 100644 (file)
@@ -1,6 +1,6 @@
 use strict;
 use warnings;
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 use Test2::Event::Exception;
 
 my $exception = Test2::Event::Exception->new(
index 4838d55..5598bee 100644 (file)
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 use Test2::Util::Trace;
 
 use Test2::API qw/context intercept/;
index 64dff5c..d908547 100644 (file)
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 
 use Test2::Event::Info;
 use Test2::Util::Trace;
index cac7da9..0292986 100644 (file)
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 use Test2::Event::Note;
 use Test2::Util::Trace;
 
index ad4a1cc..01c255c 100644 (file)
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 use Test2::Util::Trace;
 use Test2::Event::Ok;
 use Test2::Event::Diag;
index 33a5950..25db4a5 100644 (file)
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 use Test2::Event::Plan;
 use Test2::Util::Trace;
 
index a158020..8901879 100644 (file)
@@ -1,4 +1,4 @@
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 use strict;
 use warnings;
 
index d6bff4d..56e1184 100644 (file)
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 use Test2::Event::Subtest;
 my $st = 'Test2::Event::Subtest';
 
index cc54895..26b7fbb 100644 (file)
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 use Test2::Event::Waiting;
 
 my $waiting = Test2::Event::Waiting->new(
index a232186..2cf92b8 100644 (file)
@@ -4,8 +4,9 @@ use Test2::Formatter::TAP;
 use Test2::API qw/context/;
 use PerlIO;
 
+use Test2::Tools::Tiny;
+
 BEGIN {
-    require "t/tools.pl";
     *OUT_STD = Test2::Formatter::TAP->can('OUT_STD') or die;
     *OUT_ERR = Test2::Formatter::TAP->can('OUT_ERR') or die;
 }
index 4ed48bb..1d31a60 100644 (file)
@@ -2,7 +2,7 @@ use strict;
 use warnings;
 
 use Test2::IPC;
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 use Test2::API qw/context test2_ipc_drivers/;
 use Test2::Util qw/CAN_FORK CAN_THREAD CAN_REALLY_FORK/;
 
index a8b2154..71cd56a 100644 (file)
@@ -1,6 +1,6 @@
 use strict;
 use warnings;
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 
 use Test2::Hub::Interceptor;
 
index 9f25d4b..2889aac 100644 (file)
@@ -1,6 +1,6 @@
 use strict;
 use warnings;
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 
 use Test2::Hub::Interceptor::Terminator;
 
index ca16785..b0bf9f0 100644 (file)
@@ -1,6 +1,6 @@
 use strict;
 use warnings;
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 
 use Test2::Hub::Subtest;
 use Test2::Util qw/get_tid/;
index 0557925..ddd49c0 100644 (file)
@@ -4,7 +4,7 @@ use warnings;
 use Test2::IPC qw/cull/;
 use Test2::API qw/context test2_ipc_drivers test2_ipc/;
 
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 
 test2_ipc();
 
index f7daf84..cbdca09 100644 (file)
@@ -3,7 +3,7 @@ use warnings;
 
 use Test2::IPC::Driver::Files;
 
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 use Test2::API qw/context test2_ipc_drivers/;
 
 Test2::IPC::Driver::Files->import();
index c15f0e7..0e79101 100644 (file)
@@ -1,4 +1,4 @@
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 use Test2::Util qw/get_tid USE_THREADS try ipc_separator/;
 use File::Temp qw/tempfile/;
 use File::Spec qw/catfile/;
similarity index 99%
rename from cpan/Test-Simple/t/tools.t
rename to cpan/Test-Simple/t/Test2/modules/Tools/Tiny.t
index a71aff1..bdd941d 100644 (file)
@@ -2,7 +2,7 @@ use strict;
 use warnings;
 
 use Test2::IPC;
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 
 use Test2::API qw/context intercept test2_stack/;
 
index da44ba1..2bca8e3 100644 (file)
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 use Test2::Util qw/
     try
 
index de6be99..bd9812f 100644 (file)
@@ -1,6 +1,6 @@
 use strict;
 use warnings;
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 
 {
     package Foo::Bar;
index 846c04f..1f87033 100644 (file)
@@ -1,6 +1,6 @@
 use strict;
 use warnings;
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 use Test2::Util::Trace;
 
 like(
index 1bbc624..a2964fd 100644 (file)
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 use Test2::IPC;
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 use Test2::API qw/context test2_stack/;
 use Test2::Util qw/CAN_FORK/;
 
index a9e3463..1362e10 100644 (file)
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 
 use Test2::API qw/intercept/;
 
index d83ed18..b97e0e6 100644 (file)
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 
-BEGIN { require "t/tools.pl" }
+use Test2::Tools::Tiny;
 
 # This module's exports interfere with the ones in t/tools.pl
 use Test::More ();
index d6666fe..e332bb5 100644 (file)
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 
-BEGIN { require "t/tools.pl" };
+use Test2::Tools::Tiny;
 
 ok(1, "");