lib/PublicInbox/NNTP.pm | 5 +++++ public-inbox-nntpd | 2 +- diff --git a/lib/PublicInbox/NNTP.pm b/lib/PublicInbox/NNTP.pm index 0d0de976f562454c0c3443eed3c95cbbf6a9f6b7..52d6a64c2db45119953cc06d55d41ec59bcd0404 100644 --- a/lib/PublicInbox/NNTP.pm +++ b/lib/PublicInbox/NNTP.pm @@ -919,4 +919,9 @@ } $rv; } +sub busy () { + my ($self) = @_; + ($self->{rbuf} ne '' || $self->{long_res} || $self->{write_buf_size}); +} + 1; diff --git a/public-inbox-nntpd b/public-inbox-nntpd index 4c1560803e221c279be82a4de40637a6ee06393c..70bab46f304bc121ef1bf62b570665f79c0a669d 100644 --- a/public-inbox-nntpd +++ b/public-inbox-nntpd @@ -205,7 +205,7 @@ my $n = 0; foreach my $s (values %$dmap) { next unless ref($s) eq 'PublicInbox::NNTP'; - if ($s->{write_buf_size} || $s->{rbuf}) { + if ($s->busy) { ++$n; } else { $s->close;