ds: get rid of event_watch field

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

diff --git a/lib/PublicInbox/EvCleanup.pm b/lib/PublicInbox/EvCleanup.pm
index d60ac2cc8c88d3de63288c2d51d517b796e65c1d..a9f6167dff25c9054ef83a3b81c27f76cf8d847f 100644 (file)
--- a/lib/PublicInbox/EvCleanup.pm
+++ b/lib/PublicInbox/EvCleanup.pm
@@ -6,6 +6,7 @@ package PublicInbox::EvCleanup;
 use strict;
 use warnings;
 use base qw(PublicInbox::DS);
+use PublicInbox::Syscall qw(EPOLLOUT EPOLLONESHOT);
 
 my $ENABLED;
 sub enabled { $ENABLED }
@@ -59,13 +60,12 @@ sub _run_later () {
 # Called by PublicInbox::DS
 sub event_step {
        my ($self) = @_;
-       $self->watch_write(0);
        _run_asap();
 }
 
 sub _asap_timer () {
        $singleton ||= once_init();
-       $singleton->watch_write(1);
+       $singleton->watch(EPOLLOUT|EPOLLONESHOT);
        1;
 }