From 6eacd6cbcfb61cc476197fee90196f445458d2d4 Mon Sep 17 00:00:00 2001
From: Leon Timmermans <fawaka@gmail.com>
Date: Sun, 13 Aug 2023 11:51:06 +0200
Subject: [PATCH] Add missing negation in EINTR check

---
 Changes                       | 2 ++
 lib/TAP/Parser/Multiplexer.pm | 2 +-
 2 files changed, 3 insertions(+), 1 deletion(-)

diff --git a/Changes b/Changes
index ab50d4cd..fee0bc29 100644
--- a/Changes
+++ b/Changes
@@ -1,5 +1,7 @@
 Revision history for Test-Harness
 
+        - Add missing negation in EINTR check
+
 3.46  2023-07-30
         - Color the "ok"s as well.
         - Skip symlink tests on msys2
diff --git a/lib/TAP/Parser/Multiplexer.pm b/lib/TAP/Parser/Multiplexer.pm
index 194a6955..65095000 100644
--- a/lib/TAP/Parser/Multiplexer.pm
+++ b/lib/TAP/Parser/Multiplexer.pm
@@ -134,7 +134,7 @@ sub _iter {
         until (@ready) {
             return unless $sel->count;
             @ready = $sel->can_read;
-            last if @ready || $!{EINTR};
+            last if @ready || !$!{EINTR};
         }
 
         my ( $h, $parser, $stash, @handles ) = @{ shift @ready };