search: stop assuming Message-ID is unique

In general, they are, but there's no way for or general purpose
mail server to enforce that.  This is a step in allowing us
to handle more corner cases which existing lists throw at us.

1 files changed, 6 insertions, 4 deletions

diff --git a/lib/PublicInbox/SearchIdx.pm b/lib/PublicInbox/SearchIdx.pm
index fa5057fd..265403a3 100644
--- a/lib/PublicInbox/SearchIdx.pm
+++ b/lib/PublicInbox/SearchIdx.pm
@@ -366,12 +366,14 @@ sub remove_message {
         $mid = mid_clean($mid);
 
         eval {
-                $doc_id = $self->find_unique_doc_id('XMID' . $mid);
-                if (defined $doc_id) {
-                        $db->delete_document($doc_id);
-                } else {
+                my ($head, $tail) = $self->find_doc_ids('XMID' . $mid);
+                if ($head->equal($tail)) {
                         warn "cannot remove non-existent <$mid>\n";
                 }
+                for (; $head != $tail; $head->inc) {
+                        my $docid = $head->get_docid;
+                        $db->delete_document($docid);
+                }
         };
 
         if ($@) {