nntp: do not repeat result on blocked write

[public-inbox.git] / lib / PublicInbox / NNTP.pm

diff --git a/lib/PublicInbox/NNTP.pm b/lib/PublicInbox/NNTP.pm
index dd033e89e75bec54ee2a1e40c8e6b1ca4784a0ea..7e2c2abdb624da5ac72649c9b52b2f9d84984dca 100644 (file)
--- a/lib/PublicInbox/NNTP.pm
+++ b/lib/PublicInbox/NNTP.pm
@@ -508,8 +508,8 @@ sub long_response ($$$$) {
                my $err;
                do {
                        eval { $cb->(\$beg) };
-               } until (($err = $@) || $self->{closed} || $yield ||
-                        $self->{write_buf_size} || ++$beg > $end);
+               } until (($err = $@) || $self->{closed} ||
+                        ++$beg > $end || $yield || $self->{write_buf_size});
                ualarm(0);
 
                if ($err || $self->{closed}) {