From: Don Armstrong Date: Thu, 14 Dec 2017 23:46:28 +0000 (-0800) Subject: fix foreachmsg debug messages X-Git-Tag: release/2.6.0~41 X-Git-Url: https://git.donarmstrong.com/?p=debbugs.git;a=commitdiff_plain;h=0e67d0e2daba4319f2d2e6ff368a9ba3e39789ed fix foreachmsg debug messages --- diff --git a/bin/debbugs-spam b/bin/debbugs-spam index d3cb29d..f416fb3 100755 --- a/bin/debbugs-spam +++ b/bin/debbugs-spam @@ -344,17 +344,18 @@ sub foreachmsg { my ($msg_id) = record_regex($record, qr/^Message-Id:\s+<(.+)>/mi); next unless defined $msg_id; + print STDERR "examining $msg_id: " if $DEBUG; if ($msg_id =~ /$config{email_domain}$/) { - print STDERR "skipping $msg_id\n" if $DEBUG; + print STDERR "skipping\n" if $DEBUG; next; } - print STDERR "examining $msg_id: " if $DEBUG; if ($seen_msgids{$msg_id}) { print STDERR "already seen\n" if $DEBUG; next; } $seen_msgids{$msg_id}=1; $sub->($bug_num,$record,$msg_id); + print STDERR "\n" if $DEBUG; } }