search: delete QueryParser along with DB handle

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

diff --git a/lib/PublicInbox/Search.pm b/lib/PublicInbox/Search.pm
index 17e202e1da8300c5e7927ca4322f2c49bf4a5cb8..dd6d3710d03d48592d835f302b02eddce82f52df 100644 (file)
--- a/lib/PublicInbox/Search.pm
+++ b/lib/PublicInbox/Search.pm
@@ -253,7 +253,7 @@ sub cleanup_shards {
        my $nr = grep(/\A[0-9]+\z/, readdir($dh)) or
                return warn("$xpfx has no shards\n"); # true
        return reopen($self) if $nr == ($self->{nshard} // -1);
-       delete($self->{xdb});
+       delete @$self{qw(xdb qp)};
        undef;
 }