Re: for RMAIL in EMACS how do you sort probable spam type messages to a file so you can check for false positives?... what emacs commands could do it during a single session?...

[Bastien Guerry <bzg@altern.org>]

[-- Attachment #1: Type: text/plain, Size: 831 bytes --]

Eli Zaretskii <eliz@gnu.org> writes:

>> From: Don Saklad <dsaklad@gnu.org>
>> Date: Mon, 11 Feb 2008 19:08:48 -0500
>> Cc: 
>> 
>> for RMAIL in EMACS how do you sort probable spam type messages
>> to a file so you can check for false positives?... what emacs commands
>> could do it during a single session?...
>> 
>> spamassassin headers appear on many messages but the fencepost.gnu.org
>> sysadmin team does not provide end-user support for RMAIL in EMACS.
>
> Emacs 22 comes with rmail-spam-filter, so perhaps you could hack it to
> look at the spamassassin headers.  (If you do, please submit the
> changes to emacs-devel@gnu.org.)

The patch below allow the user to set `rsf-definitions-alist' so that
`rmail-spam-filter' also check the X-Spam-Status header field.

I think this is what the OP needs.

Should I apply this?


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: rmail-spam-filter.el.patch --]
[-- Type: text/x-diff, Size: 1410 bytes --]

--- rmail-spam-filter.el.~1.19.~	2008-01-08 20:45:08.000000000 +0000
+++ rmail-spam-filter.el	2008-02-13 00:53:32.000000000 +0000
@@ -201,6 +201,9 @@
 	   (cons :format "%v" :value (contents . "")
 		 (const :format ""  contents)
 		 (string :tag "Contents"  ""))
+	   (cons :format "%v" :value (x-spam-status . "")
+		 (const :format ""  x-spam-status)
+		 (string :tag "X-Spam-Status"  ""))
 	   (cons :format "%v" :value (action . output-and-delete)
 		 (const :format "" action)
 		 (choice :tag "Action selection"
@@ -284,6 +287,7 @@
 			    (concat ", " (mail-fetch-field "Cc")))))
 	  (setq message-subject (mail-fetch-field "Subject"))
 	  (setq message-content-type (mail-fetch-field "Content-Type"))
+	  (setq message-spam-status (mail-fetch-field "X-Spam-Status"))
 	  )
 	;; Find number of spam-definition elements in the list
 	;; rsf-definitions-alist specified by user:
@@ -363,6 +367,11 @@
                           (rmail-msgbeg msg) (rmail-msgend msg))
                          definition maybe-spam)
 
+	    ;; finally, check the X-Spam-Status header.  You will typically
+	    ;; look for the "Yes" string in this header field
+	    (check-field 'x-spam-status message-spam-status
+			 definition maybe-spam)
+
 	    ;; if the search in rsf-definitions-alist found
 	    ;; that this email is spam, output the email to the spam
 	    ;; rmail file, mark the email for deletion, leave the

[-- Attachment #3: Type: text/plain, Size: 13 bytes --]


-- 
Bastien