summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlperl/lib/Test
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlperl/lib/Test')
-rw-r--r--Master/tlpkg/tlperl/lib/Test/Builder.pm27
-rwxr-xr-xMaster/tlpkg/tlperl/lib/Test/Builder/Formatter.pm4
-rw-r--r--Master/tlpkg/tlperl/lib/Test/Builder/Module.pm2
-rw-r--r--Master/tlpkg/tlperl/lib/Test/Builder/Tester.pm2
-rw-r--r--Master/tlpkg/tlperl/lib/Test/Builder/Tester/Color.pm2
-rwxr-xr-xMaster/tlpkg/tlperl/lib/Test/Builder/TodoDiag.pm4
-rw-r--r--Master/tlpkg/tlperl/lib/Test/More.pm19
-rw-r--r--Master/tlpkg/tlperl/lib/Test/Simple.pm2
-rw-r--r--Master/tlpkg/tlperl/lib/Test/Tester.pm2
-rw-r--r--Master/tlpkg/tlperl/lib/Test/Tester/Capture.pm2
-rw-r--r--Master/tlpkg/tlperl/lib/Test/Tester/CaptureRunner.pm2
-rw-r--r--Master/tlpkg/tlperl/lib/Test/Tester/Delegate.pm2
-rw-r--r--Master/tlpkg/tlperl/lib/Test/use/ok.pm2
13 files changed, 35 insertions, 37 deletions
diff --git a/Master/tlpkg/tlperl/lib/Test/Builder.pm b/Master/tlpkg/tlperl/lib/Test/Builder.pm
index 46f93cc706f..b61bd5024da 100644
--- a/Master/tlpkg/tlperl/lib/Test/Builder.pm
+++ b/Master/tlpkg/tlperl/lib/Test/Builder.pm
@@ -4,7 +4,7 @@ use 5.006;
use strict;
use warnings;
-our $VERSION = '1.302133';
+our $VERSION = '1.302162';
BEGIN {
if( $] < 5.008 ) {
@@ -27,7 +27,6 @@ BEGIN {
Test2::IPC::Driver::Files->import;
Test2::API::test2_ipc_enable_polling();
Test2::API::test2_no_wait(1);
- Test2::API::test2_ipc_enable_shm();
}
}
@@ -64,18 +63,13 @@ sub _add_ts_hooks {
$todo = ${"$cpkg\::TODO"} if $cpkg;
$todo = ${"$epkg\::TODO"} if $epkg && !$todo;
- return $e unless $todo;
+ return $e unless defined $todo;
# Turn a diag into a todo diag
return Test::Builder::TodoDiag->new(%$e) if ref($e) eq 'Test2::Event::Diag';
- if ($active_hub == $hub) {
- $e->set_todo($todo) if $e->can('set_todo');
- $e->add_amnesty({tag => 'TODO', details => $todo});
- }
- else {
- $e->add_amnesty({tag => 'TODO', details => $todo, inherited => 1});
- }
+ $e->set_todo($todo) if $e->can('set_todo');
+ $e->add_amnesty({tag => 'TODO', details => $todo});
# Set todo on ok's
if ($e->isa('Test2::Event::Ok')) {
@@ -1765,7 +1759,6 @@ sub coordinate_forks {
my $ipc = Test2::IPC::apply_ipc($self->{Stack});
$ipc->set_no_fatal(1);
Test2::API::test2_no_wait(1);
- Test2::API::test2_ipc_enable_shm();
}
sub no_log_results { $_[0]->{no_log_results} = 1 }
@@ -2578,7 +2571,17 @@ L<Test::Exception> and L<Test::Differences> all use Test::Builder.
=head1 SEE ALSO
-L<Test::Simple>, L<Test::More>, L<Test::Harness>
+=head2 INTERNALS
+
+L<Test2>, L<Test2::API>
+
+=head2 LEGACY
+
+L<Test::Simple>, L<Test::More>
+
+=head2 EXTERNAL
+
+L<Test::Harness>
=head1 AUTHORS
diff --git a/Master/tlpkg/tlperl/lib/Test/Builder/Formatter.pm b/Master/tlpkg/tlperl/lib/Test/Builder/Formatter.pm
index 82a8eead675..3c29ffdaf21 100755
--- a/Master/tlpkg/tlperl/lib/Test/Builder/Formatter.pm
+++ b/Master/tlpkg/tlperl/lib/Test/Builder/Formatter.pm
@@ -2,7 +2,7 @@ package Test::Builder::Formatter;
use strict;
use warnings;
-our $VERSION = '1.302133';
+our $VERSION = '1.302162';
BEGIN { require Test2::Formatter::TAP; our @ISA = qw(Test2::Formatter::TAP) }
@@ -95,7 +95,7 @@ F<http://github.com/Test-More/test-more/>.
=head1 COPYRIGHT
-Copyright 2018 Chad Granum E<lt>exodist@cpan.orgE<gt>.
+Copyright 2019 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.
diff --git a/Master/tlpkg/tlperl/lib/Test/Builder/Module.pm b/Master/tlpkg/tlperl/lib/Test/Builder/Module.pm
index be66239db5d..1ca914dee65 100644
--- a/Master/tlpkg/tlperl/lib/Test/Builder/Module.pm
+++ b/Master/tlpkg/tlperl/lib/Test/Builder/Module.pm
@@ -7,7 +7,7 @@ use Test::Builder;
require Exporter;
our @ISA = qw(Exporter);
-our $VERSION = '1.302133';
+our $VERSION = '1.302162';
=head1 NAME
diff --git a/Master/tlpkg/tlperl/lib/Test/Builder/Tester.pm b/Master/tlpkg/tlperl/lib/Test/Builder/Tester.pm
index 25ad7c5767d..469336d8755 100644
--- a/Master/tlpkg/tlperl/lib/Test/Builder/Tester.pm
+++ b/Master/tlpkg/tlperl/lib/Test/Builder/Tester.pm
@@ -1,7 +1,7 @@
package Test::Builder::Tester;
use strict;
-our $VERSION = '1.302133';
+our $VERSION = '1.302162';
use Test::Builder;
use Symbol;
diff --git a/Master/tlpkg/tlperl/lib/Test/Builder/Tester/Color.pm b/Master/tlpkg/tlperl/lib/Test/Builder/Tester/Color.pm
index 5cb0e3465f8..0bf39c60d71 100644
--- a/Master/tlpkg/tlperl/lib/Test/Builder/Tester/Color.pm
+++ b/Master/tlpkg/tlperl/lib/Test/Builder/Tester/Color.pm
@@ -1,7 +1,7 @@
package Test::Builder::Tester::Color;
use strict;
-our $VERSION = '1.302133';
+our $VERSION = '1.302162';
require Test::Builder::Tester;
diff --git a/Master/tlpkg/tlperl/lib/Test/Builder/TodoDiag.pm b/Master/tlpkg/tlperl/lib/Test/Builder/TodoDiag.pm
index b972a49f3ef..8ac230f71c9 100755
--- a/Master/tlpkg/tlperl/lib/Test/Builder/TodoDiag.pm
+++ b/Master/tlpkg/tlperl/lib/Test/Builder/TodoDiag.pm
@@ -2,7 +2,7 @@ package Test::Builder::TodoDiag;
use strict;
use warnings;
-our $VERSION = '1.302133';
+our $VERSION = '1.302162';
BEGIN { require Test2::Event::Diag; our @ISA = qw(Test2::Event::Diag) }
@@ -58,7 +58,7 @@ F<http://github.com/Test-More/test-more/>.
=head1 COPYRIGHT
-Copyright 2018 Chad Granum E<lt>exodist@cpan.orgE<gt>.
+Copyright 2019 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.
diff --git a/Master/tlpkg/tlperl/lib/Test/More.pm b/Master/tlpkg/tlperl/lib/Test/More.pm
index 9184c6281da..473c86eba63 100644
--- a/Master/tlpkg/tlperl/lib/Test/More.pm
+++ b/Master/tlpkg/tlperl/lib/Test/More.pm
@@ -17,7 +17,7 @@ sub _carp {
return warn @_, " at $file line $line\n";
}
-our $VERSION = '1.302133';
+our $VERSION = '1.302162';
use Test::Builder::Module;
our @ISA = qw(Test::Builder::Module);
@@ -95,8 +95,10 @@ Test::More - yet another framework for writing test scripts
=head1 DESCRIPTION
B<STOP!> If you're just getting started writing tests, have a look at
-L<Test::Simple> first. This is a drop in replacement for Test::Simple
-which you can switch to once you get the hang of basic testing.
+L<Test2::Suite> first.
+
+This is a drop in replacement for Test::Simple which you can switch to once you
+get the hang of basic testing.
The purpose of this module is to provide a wide range of testing
utilities. Various ways to say "ok" with better diagnostics,
@@ -1918,6 +1920,8 @@ magic side-effects are kept to a minimum. WYSIWYG.
=head2 ALTERNATIVES
+L<Test2::Suite> is the most recent and modern set of tools for testing.
+
L<Test::Simple> if all this confuses you and you just want to write
some tests. You can upgrade to Test::More later (it's forward
compatible).
@@ -1926,15 +1930,6 @@ L<Test::Legacy> tests written with Test.pm, the original testing
module, do not play well with other testing libraries. Test::Legacy
emulates the Test.pm interface and does play well with others.
-=head2 TESTING FRAMEWORKS
-
-L<Fennec> The Fennec framework is a testers toolbox. It uses L<Test::Builder>
-under the hood. It brings enhancements for forking, defining state, and
-mocking. Fennec enhances several modules to work better together than they
-would if you loaded them individually on your own.
-
-L<Fennec::Declare> Provides enhanced (L<Devel::Declare>) syntax for Fennec.
-
=head2 ADDITIONAL LIBRARIES
L<Test::Differences> for more ways to test complex data structures.
diff --git a/Master/tlpkg/tlperl/lib/Test/Simple.pm b/Master/tlpkg/tlperl/lib/Test/Simple.pm
index 56220211126..9218173bc50 100644
--- a/Master/tlpkg/tlperl/lib/Test/Simple.pm
+++ b/Master/tlpkg/tlperl/lib/Test/Simple.pm
@@ -4,7 +4,7 @@ use 5.006;
use strict;
-our $VERSION = '1.302133';
+our $VERSION = '1.302162';
use Test::Builder::Module;
our @ISA = qw(Test::Builder::Module);
diff --git a/Master/tlpkg/tlperl/lib/Test/Tester.pm b/Master/tlpkg/tlperl/lib/Test/Tester.pm
index 758a497634f..19cbf665712 100644
--- a/Master/tlpkg/tlperl/lib/Test/Tester.pm
+++ b/Master/tlpkg/tlperl/lib/Test/Tester.pm
@@ -18,7 +18,7 @@ require Exporter;
use vars qw( @ISA @EXPORT );
-our $VERSION = '1.302133';
+our $VERSION = '1.302162';
@EXPORT = qw( run_tests check_tests check_test cmp_results show_space );
@ISA = qw( Exporter );
diff --git a/Master/tlpkg/tlperl/lib/Test/Tester/Capture.pm b/Master/tlpkg/tlperl/lib/Test/Tester/Capture.pm
index d3e342569ec..e28dbf83432 100644
--- a/Master/tlpkg/tlperl/lib/Test/Tester/Capture.pm
+++ b/Master/tlpkg/tlperl/lib/Test/Tester/Capture.pm
@@ -2,7 +2,7 @@ use strict;
package Test::Tester::Capture;
-our $VERSION = '1.302133';
+our $VERSION = '1.302162';
use Test::Builder;
diff --git a/Master/tlpkg/tlperl/lib/Test/Tester/CaptureRunner.pm b/Master/tlpkg/tlperl/lib/Test/Tester/CaptureRunner.pm
index 57f73575e92..7cf3c0f0b52 100644
--- a/Master/tlpkg/tlperl/lib/Test/Tester/CaptureRunner.pm
+++ b/Master/tlpkg/tlperl/lib/Test/Tester/CaptureRunner.pm
@@ -3,7 +3,7 @@ use strict;
package Test::Tester::CaptureRunner;
-our $VERSION = '1.302133';
+our $VERSION = '1.302162';
use Test::Tester::Capture;
diff --git a/Master/tlpkg/tlperl/lib/Test/Tester/Delegate.pm b/Master/tlpkg/tlperl/lib/Test/Tester/Delegate.pm
index a1ea620cc4d..ebfd4e21681 100644
--- a/Master/tlpkg/tlperl/lib/Test/Tester/Delegate.pm
+++ b/Master/tlpkg/tlperl/lib/Test/Tester/Delegate.pm
@@ -3,7 +3,7 @@ use warnings;
package Test::Tester::Delegate;
-our $VERSION = '1.302133';
+our $VERSION = '1.302162';
use Scalar::Util();
diff --git a/Master/tlpkg/tlperl/lib/Test/use/ok.pm b/Master/tlpkg/tlperl/lib/Test/use/ok.pm
index 1405824372b..a81bbfb64a3 100644
--- a/Master/tlpkg/tlperl/lib/Test/use/ok.pm
+++ b/Master/tlpkg/tlperl/lib/Test/use/ok.pm
@@ -1,7 +1,7 @@
package Test::use::ok;
use 5.005;
-our $VERSION = '1.302133';
+our $VERSION = '1.302162';
__END__