lib/PublicInbox/Inbox.pm | 2 ++ diff --git a/lib/PublicInbox/Inbox.pm b/lib/PublicInbox/Inbox.pm index 706089caac1b5788edb386c7dbf3a17d7f9b9f80..73f5761a875b1d1e6b8f6bfa3512248f6db54b5f 100644 --- a/lib/PublicInbox/Inbox.pm +++ b/lib/PublicInbox/Inbox.pm @@ -17,6 +17,7 @@ $cleanup_timer = 'disabled'; require PublicInbox::EvCleanup; $cleanup_timer = undef; # OK if we get here }; +my $cleanup_broken = $@; my $CLEANUP = {}; # string(inbox) -> inbox sub cleanup_task () { @@ -31,6 +32,7 @@ } sub _cleanup_later ($) { my ($self) = @_; + return if $cleanup_broken; return unless PublicInbox::EvCleanup::enabled(); $cleanup_timer ||= PublicInbox::EvCleanup::later(*cleanup_task); $CLEANUP->{"$self"} = $self;