diff options
author | Karl Berry <karl@freefriends.org> | 2019-03-10 21:56:14 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2019-03-10 21:56:14 +0000 |
commit | e0a2a718e89f9700d627f1e6a8eea8f21d2fbeb8 (patch) | |
tree | 39972f65008b0d70f306a5f976494d29411bc41e /Master/tlpkg/tlperl/lib/Test2/Event/Waiting.pm | |
parent | b206fdc77d81ed1600949062f08de5690a4bf66f (diff) |
tl19 perl 5.28.1 for Windows, from Siep
git-svn-id: svn://tug.org/texlive/trunk@50322 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/tlperl/lib/Test2/Event/Waiting.pm')
-rwxr-xr-x | Master/tlpkg/tlperl/lib/Test2/Event/Waiting.pm | 19 |
1 files changed, 17 insertions, 2 deletions
diff --git a/Master/tlpkg/tlperl/lib/Test2/Event/Waiting.pm b/Master/tlpkg/tlperl/lib/Test2/Event/Waiting.pm index fa87c6e8dd7..58b583fd5ea 100755 --- a/Master/tlpkg/tlperl/lib/Test2/Event/Waiting.pm +++ b/Master/tlpkg/tlperl/lib/Test2/Event/Waiting.pm @@ -2,15 +2,30 @@ package Test2::Event::Waiting; use strict; use warnings; -our $VERSION = '1.302073'; +our $VERSION = '1.302133'; BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) } +use Test2::Util::HashBase; sub global { 1 }; sub summary { "IPC is waiting for children to finish..." } +sub facet_data { + my $self = shift; + + my $out = $self->common_facet_data; + + push @{$out->{info}} => { + tag => 'INFO', + debug => 0, + details => $self->summary, + }; + + return $out; +} + 1; __END__ @@ -51,7 +66,7 @@ F<http://github.com/Test-More/test-more/>. =head1 COPYRIGHT -Copyright 2016 Chad Granum E<lt>exodist@cpan.orgE<gt>. +Copyright 2018 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. |