solver: schedule cleanup after synchronous git->check

We don't want hundreds of git cat-file processes for coderepos
lingering around.

1 files changed, 6 insertions, 1 deletions

diff --git a/lib/PublicInbox/Git.pm b/lib/PublicInbox/Git.pm
index fe834210..7c6e15b7 100644
--- a/lib/PublicInbox/Git.pm
+++ b/lib/PublicInbox/Git.pm
@@ -628,10 +628,15 @@ sub event_step {
         }
 }
 
+sub schedule_cleanup {
+        my ($self) = @_;
+        PublicInbox::DS::add_uniq_timer($self+0, 30, \&cleanup, $self, 1);
+}
+
 # idempotently registers with DS epoll/kqueue/select/poll
 sub watch_async ($) {
         my ($self) = @_;
-        PublicInbox::DS::add_uniq_timer($self+0, 30, \&cleanup, $self, 1);
+        schedule_cleanup($self);
         $self->{epwatch} //= do {
                 $self->SUPER::new($self->{sock}, EPOLLIN);
                 \undef;