Hello community,

here is the log from the commit of package perl-Test-Simple for 
openSUSE:Factory checked in at 2017-03-12 20:01:28
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Test-Simple (Old)
 and      /work/SRC/openSUSE:Factory/.perl-Test-Simple.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "perl-Test-Simple"

Sun Mar 12 20:01:28 2017 rev:3 rq:477085 version:1.302078

Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-Test-Simple/perl-Test-Simple.changes        
2017-02-16 17:02:01.165582641 +0100
+++ /work/SRC/openSUSE:Factory/.perl-Test-Simple.new/perl-Test-Simple.changes   
2017-03-12 20:01:29.159101049 +0100
@@ -1,0 +2,19 @@
+Fri Mar  3 07:37:45 UTC 2017 - [email protected]
+
+- updated to 1.302078
+   see /usr/share/doc/packages/perl-Test-Simple/Changes
+
+  1.302078  2017-03-01 15:24:12-08:00 America/Los_Angeles
+  
+      - No changes since last trial
+  
+  1.302077  2017-02-19 14:34:30-08:00 America/Los_Angeles (TRIAL RELEASE)
+  
+      - Fix #762, newlines for todo subtest
+      - Revisit #637, fix rare race condition it created
+  
+  1.302076  2017-02-01 19:38:42-08:00 America/Los_Angeles (TRIAL RELEASE)
+  
+      - Fix crash when TB->reset used inside subtest
+
+-------------------------------------------------------------------

Old:
----
  Test-Simple-1.302075.tar.gz

New:
----
  Test-Simple-1.302078.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ perl-Test-Simple.spec ++++++
--- /var/tmp/diff_new_pack.P77waS/_old  2017-03-12 20:01:29.815008239 +0100
+++ /var/tmp/diff_new_pack.P77waS/_new  2017-03-12 20:01:29.819007673 +0100
@@ -17,7 +17,7 @@
 
 
 Name:           perl-Test-Simple
-Version:        1.302075
+Version:        1.302078
 Release:        0
 %define cpan_name Test-Simple
 Summary:        Basic utilities for writing tests

++++++ Test-Simple-1.302075.tar.gz -> Test-Simple-1.302078.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/Changes 
new/Test-Simple-1.302078/Changes
--- old/Test-Simple-1.302075/Changes    2017-01-11 04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/Changes    2017-03-02 00:24:14.000000000 +0100
@@ -1,3 +1,16 @@
+1.302078  2017-03-01 15:24:12-08:00 America/Los_Angeles
+
+    - No changes since last trial
+
+1.302077  2017-02-19 14:34:30-08:00 America/Los_Angeles (TRIAL RELEASE)
+
+    - Fix #762, newlines for todo subtest
+    - Revisit #637, fix rare race condition it created
+
+1.302076  2017-02-01 19:38:42-08:00 America/Los_Angeles (TRIAL RELEASE)
+
+    - Fix crash when TB->reset used inside subtest
+
 1.302075  2017-01-10 19:39:28-08:00 America/Los_Angeles
 
     - No changes, just marking a stable release
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/MANIFEST 
new/Test-Simple-1.302078/MANIFEST
--- old/Test-Simple-1.302075/MANIFEST   2017-01-11 04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/MANIFEST   2017-03-02 00:24:14.000000000 +0100
@@ -282,6 +282,7 @@
 t/regression/694_note_diag_return_values.t
 t/regression/696-intercept_skip_all.t
 t/regression/721-nested-streamed-subtest.t
+t/regression/757-reset_in_subtest.t
 t/regression/no_name_in_subtest.t
 t/zzz-check-breaks.t
 xt/author/pod-spell.t
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/META.json 
new/Test-Simple-1.302078/META.json
--- old/Test-Simple-1.302075/META.json  2017-01-11 04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/META.json  2017-03-02 00:24:14.000000000 +0100
@@ -47,7 +47,7 @@
          "url" : "http://github.com/Test-More/test-more/";
       }
    },
-   "version" : "1.302075",
+   "version" : "1.302078",
    "x_breaks" : {
       "Log::Dispatch::Config::TestLog" : "<= 0.02",
       "Net::BitTorrent" : "<= 0.052",
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/META.yml 
new/Test-Simple-1.302078/META.yml
--- old/Test-Simple-1.302075/META.yml   2017-01-11 04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/META.yml   2017-03-02 00:24:14.000000000 +0100
@@ -23,7 +23,7 @@
 resources:
   bugtracker: http://github.com/Test-More/test-more/issues
   repository: http://github.com/Test-More/test-more/
-version: '1.302075'
+version: '1.302078'
 x_breaks:
   Log::Dispatch::Config::TestLog: '<= 0.02'
   Net::BitTorrent: '<= 0.052'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/Makefile.PL 
new/Test-Simple-1.302078/Makefile.PL
--- old/Test-Simple-1.302075/Makefile.PL        2017-01-11 04:39:31.000000000 
+0100
+++ new/Test-Simple-1.302078/Makefile.PL        2017-03-02 00:24:14.000000000 
+0100
@@ -24,7 +24,7 @@
     "Storable" => 0,
     "utf8" => 0
   },
-  "VERSION" => "1.302075",
+  "VERSION" => "1.302078",
   "test" => {
     "TESTS" => "t/*.t t/Legacy/*.t t/Legacy/Bugs/*.t t/Legacy/Builder/*.t 
t/Legacy/Regression/*.t t/Legacy/Simple/*.t t/Legacy/Test2/*.t 
t/Legacy/Tester/*.t t/Legacy/subtest/*.t t/Legacy_And_Test2/*.t 
t/Test2/acceptance/*.t t/Test2/behavior/*.t t/Test2/legacy/*.t 
t/Test2/modules/*.t t/Test2/modules/API/*.t t/Test2/modules/Event/*.t 
t/Test2/modules/Formatter/*.t t/Test2/modules/Hub/*.t 
t/Test2/modules/Hub/Interceptor/*.t t/Test2/modules/IPC/*.t 
t/Test2/modules/IPC/Driver/*.t t/Test2/modules/Tools/*.t 
t/Test2/modules/Util/*.t t/Test2/regression/*.t t/regression/*.t"
   }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test/Builder/Formatter.pm 
new/Test-Simple-1.302078/lib/Test/Builder/Formatter.pm
--- old/Test-Simple-1.302075/lib/Test/Builder/Formatter.pm      2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test/Builder/Formatter.pm      2017-03-02 
00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 BEGIN { require Test2::Formatter::TAP; our @ISA = qw(Test2::Formatter::TAP) }
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test/Builder/Module.pm 
new/Test-Simple-1.302078/lib/Test/Builder/Module.pm
--- old/Test-Simple-1.302075/lib/Test/Builder/Module.pm 2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test/Builder/Module.pm 2017-03-02 
00:24:14.000000000 +0100
@@ -7,7 +7,7 @@
 require Exporter;
 our @ISA = qw(Exporter);
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 =head1 NAME
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/Test-Simple-1.302075/lib/Test/Builder/Tester/Color.pm 
new/Test-Simple-1.302078/lib/Test/Builder/Tester/Color.pm
--- old/Test-Simple-1.302075/lib/Test/Builder/Tester/Color.pm   2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test/Builder/Tester/Color.pm   2017-03-02 
00:24:14.000000000 +0100
@@ -1,7 +1,7 @@
 package Test::Builder::Tester::Color;
 
 use strict;
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 require Test::Builder::Tester;
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test/Builder/Tester.pm 
new/Test-Simple-1.302078/lib/Test/Builder/Tester.pm
--- old/Test-Simple-1.302075/lib/Test/Builder/Tester.pm 2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test/Builder/Tester.pm 2017-03-02 
00:24:14.000000000 +0100
@@ -1,7 +1,7 @@
 package Test::Builder::Tester;
 
 use strict;
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 use Test::Builder;
 use Symbol;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test/Builder/TodoDiag.pm 
new/Test-Simple-1.302078/lib/Test/Builder/TodoDiag.pm
--- old/Test-Simple-1.302075/lib/Test/Builder/TodoDiag.pm       2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test/Builder/TodoDiag.pm       2017-03-02 
00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 BEGIN { require Test2::Event::Diag; our @ISA = qw(Test2::Event::Diag) }
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test/Builder.pm 
new/Test-Simple-1.302078/lib/Test/Builder.pm
--- old/Test-Simple-1.302075/lib/Test/Builder.pm        2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test/Builder.pm        2017-03-02 
00:24:14.000000000 +0100
@@ -4,7 +4,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 BEGIN {
     if( $] < 5.008 ) {
@@ -143,7 +143,8 @@
     my $chub = $self->{Hub} || $ctx->hub;
     $ctx->release;
 
-    my $parent = $chub->meta(__PACKAGE__, {})->{parent};
+    my $meta = $chub->meta(__PACKAGE__, {});
+    my $parent = $meta->{parent};
 
     return undef unless $parent;
 
@@ -375,12 +376,15 @@
     $self->{Original_Pid} = $$;
 
     my $ctx = $self->ctx;
+    my $hub = $ctx->hub;
+    $ctx->release;
     unless ($params{singleton}) {
-        $ctx->hub->reset_state();
-        $ctx->hub->set_pid($$);
-        $ctx->hub->set_tid(get_tid);
+        $hub->reset_state();
+        $hub->_tb_reset();
     }
 
+    $ctx = $self->ctx;
+
     my $meta = $ctx->hub->meta(__PACKAGE__, {});
     %$meta = (
         Name         => $0,
@@ -388,6 +392,7 @@
         Done_Testing => undef,
         Skip_All     => 0,
         Test_Results => [],
+        parent       => $meta->{parent},
     );
 
     $self->{Exported_To} = undef;
@@ -667,9 +672,6 @@
 
     my $msg = $is_todo ? "Failed (TODO)" : "Failed";
 
-    my $dfh = $self->_diag_fh;
-    print $dfh "\n" if $ENV{HARNESS_ACTIVE} && $dfh;
-
     my (undef, $file, $line) = $trace->call;
     if (defined $orig_name) {
         $self->diag(qq[  $msg test '$orig_name'\n]);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test/More.pm 
new/Test-Simple-1.302078/lib/Test/More.pm
--- old/Test-Simple-1.302075/lib/Test/More.pm   2017-01-11 04:39:31.000000000 
+0100
+++ new/Test-Simple-1.302078/lib/Test/More.pm   2017-03-02 00:24:14.000000000 
+0100
@@ -17,7 +17,7 @@
     return warn @_, " at $file line $line\n";
 }
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 use Test::Builder::Module;
 our @ISA    = qw(Test::Builder::Module);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test/Simple.pm 
new/Test-Simple-1.302078/lib/Test/Simple.pm
--- old/Test-Simple-1.302075/lib/Test/Simple.pm 2017-01-11 04:39:31.000000000 
+0100
+++ new/Test-Simple-1.302078/lib/Test/Simple.pm 2017-03-02 00:24:14.000000000 
+0100
@@ -4,7 +4,7 @@
 
 use strict;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 use Test::Builder::Module;
 our @ISA    = qw(Test::Builder::Module);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test/Tester/Capture.pm 
new/Test-Simple-1.302078/lib/Test/Tester/Capture.pm
--- old/Test-Simple-1.302075/lib/Test/Tester/Capture.pm 2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test/Tester/Capture.pm 2017-03-02 
00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 
 package Test::Tester::Capture;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 use Test::Builder;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/Test-Simple-1.302075/lib/Test/Tester/CaptureRunner.pm 
new/Test-Simple-1.302078/lib/Test/Tester/CaptureRunner.pm
--- old/Test-Simple-1.302075/lib/Test/Tester/CaptureRunner.pm   2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test/Tester/CaptureRunner.pm   2017-03-02 
00:24:14.000000000 +0100
@@ -3,7 +3,7 @@
 
 package Test::Tester::CaptureRunner;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 use Test::Tester::Capture;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test/Tester/Delegate.pm 
new/Test-Simple-1.302078/lib/Test/Tester/Delegate.pm
--- old/Test-Simple-1.302075/lib/Test/Tester/Delegate.pm        2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test/Tester/Delegate.pm        2017-03-02 
00:24:14.000000000 +0100
@@ -3,7 +3,7 @@
 
 package Test::Tester::Delegate;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 use Scalar::Util();
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test/Tester.pm 
new/Test-Simple-1.302078/lib/Test/Tester.pm
--- old/Test-Simple-1.302075/lib/Test/Tester.pm 2017-01-11 04:39:31.000000000 
+0100
+++ new/Test-Simple-1.302078/lib/Test/Tester.pm 2017-03-02 00:24:14.000000000 
+0100
@@ -18,7 +18,7 @@
 
 use vars qw( @ISA @EXPORT );
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 @EXPORT = qw( run_tests check_tests check_test cmp_results show_space );
 @ISA = qw( Exporter );
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test/use/ok.pm 
new/Test-Simple-1.302078/lib/Test/use/ok.pm
--- old/Test-Simple-1.302075/lib/Test/use/ok.pm 2017-01-11 04:39:31.000000000 
+0100
+++ new/Test-Simple-1.302078/lib/Test/use/ok.pm 2017-03-02 00:24:14.000000000 
+0100
@@ -1,7 +1,7 @@
 package Test::use::ok;
 use 5.005;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 __END__
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/API/Breakage.pm 
new/Test-Simple-1.302078/lib/Test2/API/Breakage.pm
--- old/Test-Simple-1.302075/lib/Test2/API/Breakage.pm  2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/API/Breakage.pm  2017-03-02 
00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 use Test2::Util qw/pkg_to_file/;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/API/Context.pm 
new/Test-Simple-1.302078/lib/Test2/API/Context.pm
--- old/Test-Simple-1.302075/lib/Test2/API/Context.pm   2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/API/Context.pm   2017-03-02 
00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 use Carp qw/confess croak longmess/;
@@ -267,13 +267,6 @@
     my $self = shift;
     my ($e) = @_;
 
-    # This behavior is inherited from Test::Builder which injected a newline at
-    # the start of the first diagnostics when the harness is active, but not
-    # verbose. This is important to keep the diagnostics from showing up
-    # appended to the existing line, which is hard to read. In a verbose
-    # harness there is no need for this.
-    my $prefix = $ENV{HARNESS_ACTIVE} && !$ENV{HARNESS_IS_VERBOSE} ? "\n" : "";
-
     # Figure out the debug info, this is typically the file name and line
     # number, but can also be a custom message. If no trace object is provided
     # then we have nothing useful to display.
@@ -284,8 +277,8 @@
     # Create the initial diagnostics. If the test has a name we put the debug
     # info on a second line, this behavior is inherited from Test::Builder.
     my $msg = defined($name)
-        ? qq[${prefix}Failed test '$name'\n$debug.\n]
-        : qq[${prefix}Failed test $debug.\n];
+        ? qq[Failed test '$name'\n$debug.\n]
+        : qq[Failed test $debug.\n];
 
     $self->diag($msg);
 }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/API/Instance.pm 
new/Test-Simple-1.302078/lib/Test2/API/Instance.pm
--- old/Test-Simple-1.302075/lib/Test2/API/Instance.pm  2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/API/Instance.pm  2017-03-02 
00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 our @CARP_NOT = qw/Test2::API Test2::API::Instance Test2::IPC::Driver 
Test2::Formatter/;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/API/Stack.pm 
new/Test-Simple-1.302078/lib/Test2/API/Stack.pm
--- old/Test-Simple-1.302075/lib/Test2/API/Stack.pm     2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/API/Stack.pm     2017-03-02 
00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 use Test2::Hub();
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/API.pm 
new/Test-Simple-1.302078/lib/Test2/API.pm
--- old/Test-Simple-1.302075/lib/Test2/API.pm   2017-01-11 04:39:31.000000000 
+0100
+++ new/Test-Simple-1.302078/lib/Test2/API.pm   2017-03-02 00:24:14.000000000 
+0100
@@ -7,7 +7,7 @@
     $ENV{TEST2_ACTIVE} = 1;
 }
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 my $INST;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/Event/Bail.pm 
new/Test-Simple-1.302078/lib/Test2/Event/Bail.pm
--- old/Test-Simple-1.302075/lib/Test2/Event/Bail.pm    2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/Event/Bail.pm    2017-03-02 
00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/Event/Diag.pm 
new/Test-Simple-1.302078/lib/Test2/Event/Diag.pm
--- old/Test-Simple-1.302075/lib/Test2/Event/Diag.pm    2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/Event/Diag.pm    2017-03-02 
00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/Event/Encoding.pm 
new/Test-Simple-1.302078/lib/Test2/Event/Encoding.pm
--- old/Test-Simple-1.302075/lib/Test2/Event/Encoding.pm        2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/Event/Encoding.pm        2017-03-02 
00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
 use Test2::Util::HashBase qw/encoding/;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/Event/Exception.pm 
new/Test-Simple-1.302078/lib/Test2/Event/Exception.pm
--- old/Test-Simple-1.302075/lib/Test2/Event/Exception.pm       2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/Event/Exception.pm       2017-03-02 
00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/Event/Generic.pm 
new/Test-Simple-1.302078/lib/Test2/Event/Generic.pm
--- old/Test-Simple-1.302075/lib/Test2/Event/Generic.pm 2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/Event/Generic.pm 2017-03-02 
00:24:14.000000000 +0100
@@ -5,7 +5,7 @@
 use Carp qw/croak/;
 use Scalar::Util qw/reftype/;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
 use Test2::Util::HashBase;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/Event/Info.pm 
new/Test-Simple-1.302078/lib/Test2/Event/Info.pm
--- old/Test-Simple-1.302075/lib/Test2/Event/Info.pm    2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/Event/Info.pm    2017-03-02 
00:24:14.000000000 +0100
@@ -4,7 +4,7 @@
 
 use Scalar::Util qw/blessed/;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
 use Test2::Util::HashBase qw/diagnostics renderer/;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/Event/Note.pm 
new/Test-Simple-1.302078/lib/Test2/Event/Note.pm
--- old/Test-Simple-1.302075/lib/Test2/Event/Note.pm    2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/Event/Note.pm    2017-03-02 
00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/Event/Ok.pm 
new/Test-Simple-1.302078/lib/Test2/Event/Ok.pm
--- old/Test-Simple-1.302075/lib/Test2/Event/Ok.pm      2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/Event/Ok.pm      2017-03-02 
00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/Event/Plan.pm 
new/Test-Simple-1.302078/lib/Test2/Event/Plan.pm
--- old/Test-Simple-1.302075/lib/Test2/Event/Plan.pm    2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/Event/Plan.pm    2017-03-02 
00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/Event/Skip.pm 
new/Test-Simple-1.302078/lib/Test2/Event/Skip.pm
--- old/Test-Simple-1.302075/lib/Test2/Event/Skip.pm    2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/Event/Skip.pm    2017-03-02 
00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 BEGIN { require Test2::Event::Ok; our @ISA = qw(Test2::Event::Ok) }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/Event/Subtest.pm 
new/Test-Simple-1.302078/lib/Test2/Event/Subtest.pm
--- old/Test-Simple-1.302075/lib/Test2/Event/Subtest.pm 2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/Event/Subtest.pm 2017-03-02 
00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 BEGIN { require Test2::Event::Ok; our @ISA = qw(Test2::Event::Ok) }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/Event/TAP/Version.pm 
new/Test-Simple-1.302078/lib/Test2/Event/TAP/Version.pm
--- old/Test-Simple-1.302075/lib/Test2/Event/TAP/Version.pm     2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/Event/TAP/Version.pm     2017-03-02 
00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
 use Test2::Util::HashBase qw/version/;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/Event/Waiting.pm 
new/Test-Simple-1.302078/lib/Test2/Event/Waiting.pm
--- old/Test-Simple-1.302075/lib/Test2/Event/Waiting.pm 2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/Event/Waiting.pm 2017-03-02 
00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/Event.pm 
new/Test-Simple-1.302078/lib/Test2/Event.pm
--- old/Test-Simple-1.302075/lib/Test2/Event.pm 2017-01-11 04:39:31.000000000 
+0100
+++ new/Test-Simple-1.302078/lib/Test2/Event.pm 2017-03-02 00:24:14.000000000 
+0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 use Test2::Util::HashBase qw/trace nested in_subtest subtest_id/;
 use Test2::Util::ExternalMeta qw/meta get_meta set_meta delete_meta/;
@@ -60,7 +60,7 @@
 
 sub TO_JSON {
     my $self = shift;
-    return {%$self, __PACKAGE__ => ref $self};
+    return {%$self, Test2::Util::ExternalMeta::META_KEY() => undef, 
__PACKAGE__ => ref $self};
 }
 
 1;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/Formatter/TAP.pm 
new/Test-Simple-1.302078/lib/Test2/Formatter/TAP.pm
--- old/Test-Simple-1.302075/lib/Test2/Formatter/TAP.pm 2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/Formatter/TAP.pm 2017-03-02 
00:24:14.000000000 +0100
@@ -3,10 +3,10 @@
 use warnings;
 require PerlIO;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 use Test2::Util::HashBase qw{
-    no_numbers handles _encoding
+    no_numbers handles _encoding last_fh
 };
 
 sub OUT_STD() { 0 }
@@ -101,8 +101,16 @@
         next unless $msg;
         my $io = $handles->[$hid] or next;
 
+        print $io "\n"
+            if $ENV{HARNESS_ACTIVE}
+            && !$ENV{HARNESS_IS_VERBOSE}
+            && $hid == OUT_ERR
+            && $self->{+LAST_FH} != $io
+            && $msg =~ m/^#\s*Failed test /;
+
         $msg =~ s/^/$indent/mg if $nesting;
         print $io $msg;
+        $self->{+LAST_FH} = $io;
     }
 }
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/Formatter.pm 
new/Test-Simple-1.302078/lib/Test2/Formatter.pm
--- old/Test-Simple-1.302075/lib/Test2/Formatter.pm     2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/Formatter.pm     2017-03-02 
00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 my %ADDED;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/Test-Simple-1.302075/lib/Test2/Hub/Interceptor/Terminator.pm 
new/Test-Simple-1.302078/lib/Test2/Hub/Interceptor/Terminator.pm
--- old/Test-Simple-1.302075/lib/Test2/Hub/Interceptor/Terminator.pm    
2017-01-11 04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/Hub/Interceptor/Terminator.pm    
2017-03-02 00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 1;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/Hub/Interceptor.pm 
new/Test-Simple-1.302078/lib/Test2/Hub/Interceptor.pm
--- old/Test-Simple-1.302075/lib/Test2/Hub/Interceptor.pm       2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/Hub/Interceptor.pm       2017-03-02 
00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 use Test2::Hub::Interceptor::Terminator();
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/Hub/Subtest.pm 
new/Test-Simple-1.302078/lib/Test2/Hub/Subtest.pm
--- old/Test-Simple-1.302075/lib/Test2/Hub/Subtest.pm   2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/Hub/Subtest.pm   2017-03-02 
00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 BEGIN { require Test2::Hub; our @ISA = qw(Test2::Hub) }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/Hub.pm 
new/Test-Simple-1.302078/lib/Test2/Hub.pm
--- old/Test-Simple-1.302075/lib/Test2/Hub.pm   2017-01-11 04:39:31.000000000 
+0100
+++ new/Test-Simple-1.302078/lib/Test2/Hub.pm   2017-03-02 00:24:14.000000000 
+0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 use Carp qw/carp croak confess/;
@@ -56,6 +56,21 @@
 
 sub is_subtest { 0 }
 
+sub _tb_reset {
+    my $self = shift;
+
+    # Nothing to do
+    return if $self->{+PID} == $$ && $self->{+TID} == get_tid();
+
+    $self->{+PID} = $$;
+    $self->{+TID} = get_tid();
+    $self->{+HID} = join ipc_separator, $self->{+PID}, $self->{+TID}, 
$ID_POSTFIX++;
+
+    if (my $ipc = $self->{+IPC}) {
+        $ipc->add_hub($self->{+HID});
+    }
+}
+
 sub reset_state {
     my $self = shift;
 
@@ -452,7 +467,6 @@
     my $ipc = $self->{+IPC} || return;
     return unless $$ == $self->{+PID};
     return unless get_tid() == $self->{+TID};
-
     $ipc->drop_hub($self->{+HID});
 }
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/IPC/Driver/Files.pm 
new/Test-Simple-1.302078/lib/Test2/IPC/Driver/Files.pm
--- old/Test-Simple-1.302075/lib/Test2/IPC/Driver/Files.pm      2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/IPC/Driver/Files.pm      2017-03-02 
00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 BEGIN { require Test2::IPC::Driver; our @ISA = qw(Test2::IPC::Driver) }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/IPC/Driver.pm 
new/Test-Simple-1.302078/lib/Test2/IPC/Driver.pm
--- old/Test-Simple-1.302075/lib/Test2/IPC/Driver.pm    2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/IPC/Driver.pm    2017-03-02 
00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 use Carp qw/confess longmess/;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/IPC.pm 
new/Test-Simple-1.302078/lib/Test2/IPC.pm
--- old/Test-Simple-1.302075/lib/Test2/IPC.pm   2017-01-11 04:39:31.000000000 
+0100
+++ new/Test-Simple-1.302078/lib/Test2/IPC.pm   2017-03-02 00:24:14.000000000 
+0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 use Test2::API::Instance;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/Tools/Tiny.pm 
new/Test-Simple-1.302078/lib/Test2/Tools/Tiny.pm
--- old/Test-Simple-1.302075/lib/Test2/Tools/Tiny.pm    2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/Tools/Tiny.pm    2017-03-02 
00:24:14.000000000 +0100
@@ -10,7 +10,7 @@
 use Test2::Hub::Interceptor();
 use Test2::Hub::Interceptor::Terminator();
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 BEGIN { require Exporter; our @ISA = qw(Exporter) }
 our @EXPORT = qw{
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/Transition.pod 
new/Test-Simple-1.302078/lib/Test2/Transition.pod
--- old/Test-Simple-1.302075/lib/Test2/Transition.pod   2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/Transition.pod   2017-03-02 
00:24:14.000000000 +0100
@@ -256,6 +256,14 @@
 
 Fixed in version: 0.15
 
+=item Test::More::Prefix
+
+Worked by applying a role that wrapped C<< Test::Builder->_print_comment >>.
+Fixed by adding an event filter that modifies the message instead when running
+under Test2.
+
+Fixed in version: 0.007
+
 =back
 
 =head2 STILL BROKEN
@@ -298,14 +306,6 @@
 
 Still broken as of version: 0.32
 
-=item Test::More::Prefix
-
-The current version, 0.005 is broken. A patch has been applied in git, and
-released in 0.006, but a version issue with 0.006 prevents its installation.
-
-Still broken as of version: 0.005
-Potentially fixed in version: 0.006 (not installable)
-
 =item Net::BitTorrent
 
 The tests for this module directly access L<Test::Builder> hash keys. Most, if
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/Util/ExternalMeta.pm 
new/Test-Simple-1.302078/lib/Test2/Util/ExternalMeta.pm
--- old/Test-Simple-1.302075/lib/Test2/Util/ExternalMeta.pm     2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/Util/ExternalMeta.pm     2017-03-02 
00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 use Carp qw/croak/;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/Util/Trace.pm 
new/Test-Simple-1.302078/lib/Test2/Util/Trace.pm
--- old/Test-Simple-1.302075/lib/Test2/Util/Trace.pm    2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/Test2/Util/Trace.pm    2017-03-02 
00:24:14.000000000 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 use Test2::Util qw/get_tid pkg_to_file/;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2/Util.pm 
new/Test-Simple-1.302078/lib/Test2/Util.pm
--- old/Test-Simple-1.302075/lib/Test2/Util.pm  2017-01-11 04:39:31.000000000 
+0100
+++ new/Test-Simple-1.302078/lib/Test2/Util.pm  2017-03-02 00:24:14.000000000 
+0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 use Config qw/%Config/;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/Test2.pm 
new/Test-Simple-1.302078/lib/Test2.pm
--- old/Test-Simple-1.302075/lib/Test2.pm       2017-01-11 04:39:31.000000000 
+0100
+++ new/Test-Simple-1.302078/lib/Test2.pm       2017-03-02 00:24:14.000000000 
+0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 
 1;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Test-Simple-1.302075/lib/ok.pm 
new/Test-Simple-1.302078/lib/ok.pm
--- old/Test-Simple-1.302075/lib/ok.pm  2017-01-11 04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/lib/ok.pm  2017-03-02 00:24:14.000000000 +0100
@@ -1,5 +1,5 @@
 package ok;
-our $VERSION = '1.302075';
+our $VERSION = '1.302078';
 
 use strict;
 use Test::More ();
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/Test-Simple-1.302075/t/Test2/modules/IPC/Driver/Files.t 
new/Test-Simple-1.302078/t/Test2/modules/IPC/Driver/Files.t
--- old/Test-Simple-1.302075/t/Test2/modules/IPC/Driver/Files.t 2017-01-11 
04:39:31.000000000 +0100
+++ new/Test-Simple-1.302078/t/Test2/modules/IPC/Driver/Files.t 2017-03-02 
00:24:14.000000000 +0100
@@ -160,11 +160,13 @@
         if (opendir(my $d, $tmpdir)) {
             for my $f (readdir($d)) {
                 next if $f =~ m/^\.+$/;
-                next unless -f "$tmpdir/$f";
-                unlink("$tmpdir/$f");
+                my $file = File::Spec->catfile($tmpdir, $f);
+                next unless -f $file;
+                1 while unlink $file;
             }
+            closedir($d);
+            rmdir($tmpdir) or warn "Could not remove temp dir '$tmpdir': $!";
         }
-        rmdir($tmpdir) or warn "Could not remove temp dir '$tmpdir': $!";
     };
     $cleanup->();
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/Test-Simple-1.302075/t/regression/757-reset_in_subtest.t 
new/Test-Simple-1.302078/t/regression/757-reset_in_subtest.t
--- old/Test-Simple-1.302075/t/regression/757-reset_in_subtest.t        
1970-01-01 01:00:00.000000000 +0100
+++ new/Test-Simple-1.302078/t/regression/757-reset_in_subtest.t        
2017-03-02 00:24:14.000000000 +0100
@@ -0,0 +1,20 @@
+use strict;
+use warnings;
+
+use Test::More;
+
+subtest 'subtest' => sub {
+    Test::Builder->new->reset;
+    ok 1;
+};
+
+subtest 'subtest' => sub {
+    Test::Builder->new->reset;
+    subtest 'subtest' => sub {
+        Test::Builder->new->reset;
+        ok 1;
+    };
+    ok 1;
+};
+
+done_testing;


Reply via email to