Script 'mail_helper' called by obssrc
Hello community,

here is the log from the commit of package perl-Future-IO for openSUSE:Factory 
checked in at 2023-02-20 17:46:58
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Future-IO (Old)
 and      /work/SRC/openSUSE:Factory/.perl-Future-IO.new.22824 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "perl-Future-IO"

Mon Feb 20 17:46:58 2023 rev:3 rq:1066844 version:0.13

Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-Future-IO/perl-Future-IO.changes    
2023-02-16 16:56:13.638790659 +0100
+++ /work/SRC/openSUSE:Factory/.perl-Future-IO.new.22824/perl-Future-IO.changes 
2023-02-20 17:48:01.656168435 +0100
@@ -1,0 +2,17 @@
+Mon Feb 20 03:06:14 UTC 2023 - Tina Müller <timueller+p...@suse.de>
+
+- updated to 0.13
+   see /usr/share/doc/packages/perl-Future-IO/Changes
+
+  0.13    2023-02-19
+          [CHANGES]
+           * Swap all unit tests from `Test::More` to `Test2::V0`
+           * Reomved test-time dependency on `Test::Identity`
+
+          [BUGFIXES]
+           * t/30system.t should check that the impl actually provides a
+             `->waitpid` method before using it
+           * Insert a hacky "sleep 1" into the connect tests on MSWin32 in case
+             that helps fix the test failures
+
+-------------------------------------------------------------------

Old:
----
  Future-IO-0.12.tar.gz

New:
----
  Future-IO-0.13.tar.gz

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

Other differences:
------------------
++++++ perl-Future-IO.spec ++++++
--- /var/tmp/diff_new_pack.Bf6T55/_old  2023-02-20 17:48:02.096170920 +0100
+++ /var/tmp/diff_new_pack.Bf6T55/_new  2023-02-20 17:48:02.100170943 +0100
@@ -18,7 +18,7 @@
 
 %define cpan_name Future-IO
 Name:           perl-Future-IO
-Version:        0.12
+Version:        0.13
 Release:        0
 License:        Artistic-1.0 OR GPL-1.0-or-later
 Summary:        Future-returning IO methods
@@ -31,8 +31,7 @@
 BuildRequires:  perl(Future)
 BuildRequires:  perl(Module::Build) >= 0.400400
 BuildRequires:  perl(Struct::Dumb)
-BuildRequires:  perl(Test::Identity)
-BuildRequires:  perl(Test::More) >= 0.88
+BuildRequires:  perl(Test2::V0)
 Requires:       perl(Future)
 Requires:       perl(Struct::Dumb)
 %{perl_requires}

++++++ Future-IO-0.12.tar.gz -> Future-IO-0.13.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Future-IO-0.12/Build.PL new/Future-IO-0.13/Build.PL
--- old/Future-IO-0.12/Build.PL 2023-01-31 16:43:41.000000000 +0100
+++ new/Future-IO-0.13/Build.PL 2023-02-19 21:25:48.000000000 +0100
@@ -14,8 +14,7 @@
       'perl' => '5.014',
    },
    test_requires => {
-      'Test::Identity' => 0,
-      'Test::More' => '0.88', # done_testing
+      'Test2::V0' => 0,
    },
    configure_requires => {
       'Module::Build' => '0.4004', # test_requires
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Future-IO-0.12/Changes new/Future-IO-0.13/Changes
--- old/Future-IO-0.12/Changes  2023-01-31 16:43:41.000000000 +0100
+++ new/Future-IO-0.13/Changes  2023-02-19 21:25:48.000000000 +0100
@@ -1,5 +1,16 @@
 Revision history for Future-IO
 
+0.13    2023-02-19
+        [CHANGES]
+         * Swap all unit tests from `Test::More` to `Test2::V0`
+         * Reomved test-time dependency on `Test::Identity`
+
+        [BUGFIXES]
+         * t/30system.t should check that the impl actually provides a
+           `->waitpid` method before using it
+         * Insert a hacky "sleep 1" into the connect tests on MSWin32 in case
+           that helps fix the test failures
+
 0.12    2023-01-31
         [CHANGES]
          * Added `Future::IO::System`, containing a system()-like and a
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Future-IO-0.12/MANIFEST new/Future-IO-0.13/MANIFEST
--- old/Future-IO-0.12/MANIFEST 2023-01-31 16:43:41.000000000 +0100
+++ new/Future-IO-0.13/MANIFEST 2023-02-19 21:25:48.000000000 +0100
@@ -4,7 +4,11 @@
 lib/Future/IO/ImplBase.pm
 lib/Future/IO/System.pm
 lib/Test/Future/IO/Impl.pm
+LICENSE
 MANIFEST                       This list of files
+META.json
+META.yml
+README
 t/00use.t
 t/01sleep.t
 t/02sysread.t
@@ -19,7 +23,3 @@
 t/21impl-before-load.t
 t/30system.t
 t/99pod.t
-README
-LICENSE
-META.yml
-META.json
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Future-IO-0.12/META.json new/Future-IO-0.13/META.json
--- old/Future-IO-0.12/META.json        2023-01-31 16:43:41.000000000 +0100
+++ new/Future-IO-0.13/META.json        2023-02-19 21:25:48.000000000 +0100
@@ -29,27 +29,26 @@
       },
       "test" : {
          "requires" : {
-            "Test::Identity" : "0",
-            "Test::More" : "0.88"
+            "Test2::V0" : "0"
          }
       }
    },
    "provides" : {
       "Future::IO" : {
          "file" : "lib/Future/IO.pm",
-         "version" : "0.12"
+         "version" : "0.13"
       },
       "Future::IO::ImplBase" : {
          "file" : "lib/Future/IO/ImplBase.pm",
-         "version" : "0.12"
+         "version" : "0.13"
       },
       "Future::IO::System" : {
          "file" : "lib/Future/IO/System.pm",
-         "version" : "0.12"
+         "version" : "0.13"
       },
       "Test::Future::IO::Impl" : {
          "file" : "lib/Test/Future/IO/Impl.pm",
-         "version" : "0.12"
+         "version" : "0.13"
       }
    },
    "release_status" : "stable",
@@ -58,6 +57,6 @@
          "http://dev.perl.org/licenses/";
       ]
    },
-   "version" : "0.12",
+   "version" : "0.13",
    "x_serialization_backend" : "JSON::PP version 4.07"
 }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Future-IO-0.12/META.yml new/Future-IO-0.13/META.yml
--- old/Future-IO-0.12/META.yml 2023-01-31 16:43:41.000000000 +0100
+++ new/Future-IO-0.13/META.yml 2023-02-19 21:25:48.000000000 +0100
@@ -3,8 +3,7 @@
 author:
   - 'Paul Evans <leon...@leonerd.org.uk>'
 build_requires:
-  Test::Identity: '0'
-  Test::More: '0.88'
+  Test2::V0: '0'
 configure_requires:
   Module::Build: '0.4004'
 dynamic_config: 1
@@ -17,16 +16,16 @@
 provides:
   Future::IO:
     file: lib/Future/IO.pm
-    version: '0.12'
+    version: '0.13'
   Future::IO::ImplBase:
     file: lib/Future/IO/ImplBase.pm
-    version: '0.12'
+    version: '0.13'
   Future::IO::System:
     file: lib/Future/IO/System.pm
-    version: '0.12'
+    version: '0.13'
   Test::Future::IO::Impl:
     file: lib/Test/Future/IO/Impl.pm
-    version: '0.12'
+    version: '0.13'
 requires:
   Future: '0'
   Struct::Dumb: '0'
@@ -34,5 +33,5 @@
   perl: '5.014'
 resources:
   license: http://dev.perl.org/licenses/
-version: '0.12'
+version: '0.13'
 x_serialization_backend: 'CPAN::Meta::YAML version 0.018'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Future-IO-0.12/lib/Future/IO/ImplBase.pm 
new/Future-IO-0.13/lib/Future/IO/ImplBase.pm
--- old/Future-IO-0.12/lib/Future/IO/ImplBase.pm        2023-01-31 
16:43:41.000000000 +0100
+++ new/Future-IO-0.13/lib/Future/IO/ImplBase.pm        2023-02-19 
21:25:48.000000000 +0100
@@ -3,7 +3,7 @@
 #
 #  (C) Paul Evans, 2019-2021 -- leon...@leonerd.org.uk
 
-package Future::IO::ImplBase 0.12;
+package Future::IO::ImplBase 0.13;
 
 use v5.14;
 use warnings;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Future-IO-0.12/lib/Future/IO/System.pm 
new/Future-IO-0.13/lib/Future/IO/System.pm
--- old/Future-IO-0.12/lib/Future/IO/System.pm  2023-01-31 16:43:41.000000000 
+0100
+++ new/Future-IO-0.13/lib/Future/IO/System.pm  2023-02-19 21:25:48.000000000 
+0100
@@ -3,7 +3,7 @@
 #
 #  (C) Paul Evans, 2023 -- leon...@leonerd.org.uk
 
-package Future::IO::System 0.12;
+package Future::IO::System 0.13;
 
 use v5.14;
 use warnings;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Future-IO-0.12/lib/Future/IO.pm 
new/Future-IO-0.13/lib/Future/IO.pm
--- old/Future-IO-0.12/lib/Future/IO.pm 2023-01-31 16:43:41.000000000 +0100
+++ new/Future-IO-0.13/lib/Future/IO.pm 2023-02-19 21:25:48.000000000 +0100
@@ -3,7 +3,7 @@
 #
 #  (C) Paul Evans, 2019-2023 -- leon...@leonerd.org.uk
 
-package Future::IO 0.12;
+package Future::IO 0.13;
 
 use v5.14;
 use warnings;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Future-IO-0.12/lib/Test/Future/IO/Impl.pm 
new/Future-IO-0.13/lib/Test/Future/IO/Impl.pm
--- old/Future-IO-0.12/lib/Test/Future/IO/Impl.pm       2023-01-31 
16:43:41.000000000 +0100
+++ new/Future-IO-0.13/lib/Test/Future/IO/Impl.pm       2023-02-19 
21:25:48.000000000 +0100
@@ -3,13 +3,13 @@
 #
 #  (C) Paul Evans, 2021 -- leon...@leonerd.org.uk
 
-package Test::Future::IO::Impl 0.12;
+package Test::Future::IO::Impl 0.13;
 
 use v5.14;
 use warnings;
 
-use Test::More;
-use Test::Builder;
+use Test2::V0;
+use Test2::API ();
 
 use Errno qw( EINVAL EPIPE );
 use IO::Handle;
@@ -58,17 +58,19 @@
 sub time_about(&@)
 {
    my ( $code, $want_time, $name ) = @_;
-   my $test = Test::Builder->new;
+   my $ctx = Test2::API::context;
 
    my $t0 = time();
    $code->();
    my $t1 = time();
 
    my $got_time = $t1 - $t0;
-   $test->ok(
+   $ctx->ok(
       $got_time >= $want_time * 0.9 && $got_time <= $want_time * 1.5, $name
    ) or
-      $test->diag( sprintf "Test took %.3f seconds", $got_time );
+      $ctx->diag( sprintf "Test took %.3f seconds", $got_time );
+
+   $ctx->release;
 }
 
 =head2 run_tests
@@ -176,6 +178,10 @@
    $serversock->close;
    undef $serversock;
 
+   # I really hate this, but apparently Win32 testers will fail if we don't
+   # do this.
+   sleep 1 if $^O eq "MSWin32";
+
    # ->connect fails
    {
       my $clientsock = IO::Socket::INET->new(
@@ -187,7 +193,7 @@
 
       ok( !eval { $f->get; 1 }, 'Future::IO->connect fails on closed server' );
 
-      is_deeply( [ $f->failure ],
+      is( [ $f->failure ],
          [ "connect: $errstr_ECONNREFUSED\n", connect => $clientsock, 
$errstr_ECONNREFUSED ],
          'Future::IO->connect failure' );
    }
@@ -201,8 +207,6 @@
 
 sub run_sleep_test
 {
-   my $test = Test::Builder->new;
-
    time_about sub {
       Future::IO->sleep( 0.2 )->get;
    }, 0.2, 'Future::IO->sleep( 0.2 ) sleeps 0.2 seconds';
@@ -255,7 +259,7 @@
 
       my $f = Future::IO->sysread( $rd, 1 );
 
-      is_deeply( [ $f->get ], [], 'Future::IO->sysread yields nothing on EOF' 
);
+      is( [ $f->get ], [], 'Future::IO->sysread yields nothing on EOF' );
    }
 
    # TODO: is there a nice portable way we can test for an IO error?
@@ -327,7 +331,7 @@
 
       ok( !eval { $f->get }, 'Future::IO->syswrite fails on EPIPE' );
 
-      is_deeply( [ $f->failure ],
+      is( [ $f->failure ],
          [ "syswrite: $errstr_EPIPE\n", syswrite => $wr, $errstr_EPIPE ],
          'Future::IO->syswrite failure for EPIPE' );
    }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Future-IO-0.12/t/00use.t new/Future-IO-0.13/t/00use.t
--- old/Future-IO-0.12/t/00use.t        2023-01-31 16:43:41.000000000 +0100
+++ new/Future-IO-0.13/t/00use.t        2023-02-19 21:25:48.000000000 +0100
@@ -3,11 +3,12 @@
 use v5.14;
 use warnings;
 
-use Test::More;
+use Test2::V0;
 
-use_ok( "Future::IO" );
-use_ok( "Future::IO::ImplBase" );
+require Future::IO;
+require Future::IO::ImplBase;
 
-use_ok( "Test::Future::IO::Impl" );
+require Test::Future::IO::Impl;;
 
+pass "Modules loaded";
 done_testing;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Future-IO-0.12/t/01sleep.t 
new/Future-IO-0.13/t/01sleep.t
--- old/Future-IO-0.12/t/01sleep.t      2023-01-31 16:43:41.000000000 +0100
+++ new/Future-IO-0.13/t/01sleep.t      2023-02-19 21:25:48.000000000 +0100
@@ -3,7 +3,7 @@
 use v5.14;
 use warnings;
 
-use Test::More;
+use Test2::V0;
 use Test::Future::IO::Impl;
 
 use Future::IO;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Future-IO-0.12/t/02sysread.t 
new/Future-IO-0.13/t/02sysread.t
--- old/Future-IO-0.12/t/02sysread.t    2023-01-31 16:43:41.000000000 +0100
+++ new/Future-IO-0.13/t/02sysread.t    2023-02-19 21:25:48.000000000 +0100
@@ -3,7 +3,7 @@
 use v5.14;
 use warnings;
 
-use Test::More;
+use Test2::V0;
 use Test::Future::IO::Impl;
 
 use Future::IO;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Future-IO-0.12/t/03sysread_exactly.t 
new/Future-IO-0.13/t/03sysread_exactly.t
--- old/Future-IO-0.12/t/03sysread_exactly.t    2023-01-31 16:43:41.000000000 
+0100
+++ new/Future-IO-0.13/t/03sysread_exactly.t    2023-02-19 21:25:48.000000000 
+0100
@@ -3,7 +3,7 @@
 use v5.14;
 use warnings;
 
-use Test::More;
+use Test2::V0;
 
 use IO::Handle;
 
@@ -28,7 +28,7 @@
 
    is( scalar $f->get, "BYTES", 'Future::IO->sysread_exactly eventually yields 
all the bytes' );
 
-   is_deeply( \@read, [ 5, 4, 3, 2, 1 ], 'IO::Handle->sysread override worked' 
);
+   is( \@read, [ 5, 4, 3, 2, 1 ], 'IO::Handle->sysread override worked' );
 }
 
 # ->sysread_exactly yielding EOF
@@ -43,7 +43,7 @@
    $wr->close;
    undef $wr;
 
-   is_deeply( [ $f->get ], [], 'Future::IO->sysread_exactly yields nothing on 
EOF' );
+   is( [ $f->get ], [], 'Future::IO->sysread_exactly yields nothing on EOF' );
 }
 
 done_testing;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Future-IO-0.12/t/03sysread_until_eof.t 
new/Future-IO-0.13/t/03sysread_until_eof.t
--- old/Future-IO-0.12/t/03sysread_until_eof.t  2023-01-31 16:43:41.000000000 
+0100
+++ new/Future-IO-0.13/t/03sysread_until_eof.t  2023-02-19 21:25:48.000000000 
+0100
@@ -3,7 +3,7 @@
 use v5.14;
 use warnings;
 
-use Test::More;
+use Test2::V0;
 
 use IO::Handle;
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Future-IO-0.12/t/04syswrite.t 
new/Future-IO-0.13/t/04syswrite.t
--- old/Future-IO-0.12/t/04syswrite.t   2023-01-31 16:43:41.000000000 +0100
+++ new/Future-IO-0.13/t/04syswrite.t   2023-02-19 21:25:48.000000000 +0100
@@ -3,7 +3,7 @@
 use v5.14;
 use warnings;
 
-use Test::More;
+use Test2::V0;
 use Test::Future::IO::Impl;
 
 use Future::IO;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Future-IO-0.12/t/05syswrite_exactly.t 
new/Future-IO-0.13/t/05syswrite_exactly.t
--- old/Future-IO-0.12/t/05syswrite_exactly.t   2023-01-31 16:43:41.000000000 
+0100
+++ new/Future-IO-0.13/t/05syswrite_exactly.t   2023-02-19 21:25:48.000000000 
+0100
@@ -3,7 +3,7 @@
 use v5.14;
 use warnings;
 
-use Test::More;
+use Test2::V0;
 
 use IO::Handle;
 
@@ -25,7 +25,7 @@
 
    is( scalar $f->get, 3, 'Future::IO->syswrite_exactly eventually writes all 
bytes' );
 
-   is_deeply( \@written, [ "ABC", "BC", "C" ], 'IO::Handle->syswrite override 
worked' );
+   is( \@written, [ "ABC", "BC", "C" ], 'IO::Handle->syswrite override worked' 
);
 
    $rd->read( my $buf, 3 );
    is( $buf, "ABC", 'Future::IO->syswrite_exactly wrote bytes' );
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Future-IO-0.12/t/06connect.t 
new/Future-IO-0.13/t/06connect.t
--- old/Future-IO-0.12/t/06connect.t    2023-01-31 16:43:41.000000000 +0100
+++ new/Future-IO-0.13/t/06connect.t    2023-02-19 21:25:48.000000000 +0100
@@ -3,7 +3,7 @@
 use v5.14;
 use warnings;
 
-use Test::More;
+use Test2::V0;
 use Test::Future::IO::Impl;
 
 use Future::IO;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Future-IO-0.12/t/07accept.t 
new/Future-IO-0.13/t/07accept.t
--- old/Future-IO-0.12/t/07accept.t     2023-01-31 16:43:41.000000000 +0100
+++ new/Future-IO-0.13/t/07accept.t     2023-02-19 21:25:48.000000000 +0100
@@ -3,7 +3,7 @@
 use v5.14;
 use warnings;
 
-use Test::More;
+use Test2::V0;
 use Test::Future::IO::Impl;
 
 use Future::IO;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Future-IO-0.12/t/10sleep+sysread.t 
new/Future-IO-0.13/t/10sleep+sysread.t
--- old/Future-IO-0.12/t/10sleep+sysread.t      2023-01-31 16:43:41.000000000 
+0100
+++ new/Future-IO-0.13/t/10sleep+sysread.t      2023-02-19 21:25:48.000000000 
+0100
@@ -3,7 +3,7 @@
 use v5.14;
 use warnings;
 
-use Test::More;
+use Test2::V0;
 
 use IO::Handle;
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Future-IO-0.12/t/20impl-override.t 
new/Future-IO-0.13/t/20impl-override.t
--- old/Future-IO-0.12/t/20impl-override.t      2023-01-31 16:43:41.000000000 
+0100
+++ new/Future-IO-0.13/t/20impl-override.t      2023-02-19 21:25:48.000000000 
+0100
@@ -3,8 +3,7 @@
 use v5.14;
 use warnings;
 
-use Test::More;
-use Test::Identity;
+use Test2::V0;
 
 use Future::IO;
 
@@ -32,8 +31,8 @@
 
    my $f = Future::IO->sleep( 5 );
 
-   is_deeply( \@impl_args, [ 5 ], '->sleep args' );
-   identical( $f, $impl_f, '->sleep return' );
+   is( \@impl_args, [ 5 ], '->sleep args' );
+   ref_is( $f, $impl_f, '->sleep return' );
 
    $f->cancel;
 }
@@ -44,8 +43,8 @@
 
    my $f = Future::IO->sysread( "FH", 1024 );
 
-   is_deeply( \@impl_args, [ "FH", 1024 ], '->sysread args' );
-   identical( $f, $impl_f, '->sysread return' );
+   is( \@impl_args, [ "FH", 1024 ], '->sysread args' );
+   ref_is( $f, $impl_f, '->sysread return' );
 
    $f->cancel;
 }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Future-IO-0.12/t/21impl-before-load.t 
new/Future-IO-0.13/t/21impl-before-load.t
--- old/Future-IO-0.12/t/21impl-before-load.t   2023-01-31 16:43:41.000000000 
+0100
+++ new/Future-IO-0.13/t/21impl-before-load.t   2023-02-19 21:25:48.000000000 
+0100
@@ -3,8 +3,7 @@
 use v5.14;
 use warnings;
 
-use Test::More;
-use Test::Identity;
+use Test2::V0;
 
 no warnings 'once';
 $Future::IO::IMPL = "TestImplementation";
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Future-IO-0.12/t/30system.t 
new/Future-IO-0.13/t/30system.t
--- old/Future-IO-0.12/t/30system.t     2023-01-31 16:43:41.000000000 +0100
+++ new/Future-IO-0.13/t/30system.t     2023-02-19 21:25:48.000000000 +0100
@@ -3,7 +3,7 @@
 use v5.14;
 use warnings;
 
-use Test::More;
+use Test2::V0;
 
 use IO::Handle;
 
@@ -18,7 +18,11 @@
          Future::IO::Impl::Glib
          Future::IO::Impl::IOAsync
       )) {
-      eval { require "$impl.pm" =~ s{::}{/}gr; 1 } and return;
+      eval { require "$impl.pm" =~ s{::}{/}gr; 1 } or next;
+      $impl->can( "waitpid" ) and return;
+
+      # Clear that impl before trying again
+      undef $Future::IO::IMPL;
    }
 
    plan skip_all => "Unable to find a Future::IO impl that supports ->waitpid";
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Future-IO-0.12/t/99pod.t new/Future-IO-0.13/t/99pod.t
--- old/Future-IO-0.12/t/99pod.t        2023-01-31 16:43:41.000000000 +0100
+++ new/Future-IO-0.13/t/99pod.t        2023-02-19 21:25:48.000000000 +0100
@@ -3,7 +3,7 @@
 use v5.14;
 use warnings;
 
-use Test::More;
+use Test2::V0;
 
 eval "use Test::Pod 1.00";
 plan skip_all => "Test::Pod 1.00 required for testing POD" if $@;

Reply via email to