dskqxs: ignore EV_SET errors on EVFILT_WRITE

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

diff --git a/lib/PublicInbox/DSKQXS.pm b/lib/PublicInbox/DSKQXS.pm
index b9b0b6c5dfbae3f29dd61a10a4778d41a37e8f1a..35cdecda8985965578c5aa4283885dd384596afb 100644 (file)
--- a/lib/PublicInbox/DSKQXS.pm
+++ b/lib/PublicInbox/DSKQXS.pm
@@ -105,10 +105,10 @@ sub epoll_ctl {
        my $kq = $self->{kq};
        if ($op == EPOLL_CTL_MOD) {
                $kq->EV_SET($fd, EVFILT_READ, kq_flag(EPOLLIN, $ev));
-               $kq->EV_SET($fd, EVFILT_WRITE, kq_flag(EPOLLOUT, $ev));
+               eval { $kq->EV_SET($fd, EVFILT_WRITE, kq_flag(EPOLLOUT, $ev)) };
        } elsif ($op == EPOLL_CTL_DEL) {
                $kq->EV_SET($fd, EVFILT_READ, EV_DISABLE);
-               $kq->EV_SET($fd, EVFILT_WRITE, EV_DISABLE);
+               eval { $kq->EV_SET($fd, EVFILT_WRITE, EV_DISABLE) };
        } else { # EPOLL_CTL_ADD
                $kq->EV_SET($fd, EVFILT_READ, EV_ADD|kq_flag(EPOLLIN, $ev));