From b79cbcc5573ff0140b5eb9f34765c45c19cea792 Mon Sep 17 00:00:00 2001
From: Don Armstrong <don@donarmstrong.com>
Date: Fri, 15 Dec 2017 16:31:51 -0800
Subject: [PATCH] we only care about incoming-recv messages

---
 bin/debbugs-spam | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/bin/debbugs-spam b/bin/debbugs-spam
index be1ab247..25ba7c66 100755
--- a/bin/debbugs-spam
+++ b/bin/debbugs-spam
@@ -422,8 +422,7 @@ sub foreachmsg {
         die "Unable to open bug log for $bug_num";
     my %seen_msgids;
     while (my $record = $log->read_record()) {
-        next if $record->{type} eq 'html';
-        next if $record->{type} eq 'autocheck';
+        next unless $record->{type} eq 'incoming-recv';
         my ($msg_id) = record_regex($record,
                                     qr/^Message-Id:\s+<(.+)>/mi);
         next unless defined $msg_id;
-- 
2.39.5