fix $is_match of mark_it

diff --git a/bin/debbugs-spam b/bin/debbugs-spam
index f416fb339386bf0a5c3e281ff59d025ce9f9930b..cd4fbd6dc49340ae01861a3289a4c95d23c192fb 100755 (executable)
--- a/bin/debbugs-spam
+++ b/bin/debbugs-spam
@@ -192,10 +192,13 @@ sub mark_it {
                        if ($mid =~ /\Q$regex\E/) {
                            $is_match = 1;
                        }
-                       if ($spam_ham eq 'spam') {
-                           $spam->add_spam($mid);
-                       } else {
-                           $spam->add_ham($mid);
+                       if ($is_match) {
+                           print STDERR "it's a match" if $DEBUG;
+                           if ($spam_ham eq 'spam') {
+                               $spam->add_spam($mid);
+                           } else {
+                               $spam->add_ham($mid);
+                           }
                        }
                    },
                    $bug_num