add flagging of test messages

[etc/mailfilter.git] / procmail / spamfilter

diff --git a/procmail/spamfilter b/procmail/spamfilter
index 066b9cbd7845ca878c43036ee08559eb33e55bd0..9e88642e942f76a32de62fad70bb7bad5e5f13cb 100755 (executable)
--- a/procmail/spamfilter
+++ b/procmail/spamfilter
@@ -29,16 +29,21 @@ PMDIR=${PMDIR:-$HOME/.etc/mailfilter/procmail}
 #  |$FORMAIL -I"X-Spam: spamtrapped"
 #}
 
 #  |$FORMAIL -I"X-Spam: spamtrapped"
 #}
 

-# check whether this message is being reinjected
-TRAINED_AS
+# check whether this message is being resubmitted

 :0
 *$ $MSG_DEJAVU
 :0
 *$ $MSG_DEJAVU

-* ^X-Trained-As: \/(h|sp)am

 {
 {

-  LOG="spamfilter:  skipping already trained $MATCH$NL"

   :0
   :0

-  * MATCH ?? spam
-  { IS_SPAM=already-trained }
+  * TRAINED_AS ?? .
+  {
+    LOG="spamfilter:  skipping already trained $TRAINED_AS$NL"
+    :0
+    * TRAINED_AS ?? spam
+    { IS_SPAM=already-trained }
+  }
+
+  :0 E
+  { LOG="spamfilter:  skipping resubmitted message$NL" }

 }
 
 # let earlier parts of the mailfilter cause bypassing the checks
 }
 
 # let earlier parts of the mailfilter cause bypassing the checks


@@ -261,6 +266,7 @@ TRAINED_AS
   |$FORMAIL -I"X-Spam: spamtrapped ham"
   IS_SPAM=spamtrapped-ham
   RETRAIN=spam
   |$FORMAIL -I"X-Spam: spamtrapped ham"
   IS_SPAM=spamtrapped-ham
   RETRAIN=spam

+  SPAM_UNSURE

 }
 
 #VERBOSE=no
 }
 
 #VERBOSE=no