[gnus git] branch master updated: =1= Fix sa-learn integration to insert a full From in the message envelope.

Ted Zlatanov <[email protected]>
Newsgroups gmane.emacs.gnus.cvs
Message-ID <[email protected]>
       via  6a153e9d3c93691db6134c28a29bbc3b1353a906 (commit)
      from  558b1a1e11f15859b6bba3988545c7520edb21f2 (commit)


- Log -----------------------------------------------------------------
commit 6a153e9d3c93691db6134c28a29bbc3b1353a906
Author: Ted Zlatanov <[email protected]>
Date:   Wed Jan 19 15:32:01 2011 -0600

    Fix sa-learn integration to insert a full From in the message envelope.
    
    Before this was just "From\n" but now it includes "nobody" as the
    sender and the date.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7bda2a0..5ebc86a 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2011-01-19  Tom Rauchenwald  <[email protected]>  (tiny change)
+	* spam.el (spam-spamassassin-register-with-sa-learn): Insert a full
+	From header with a date and "nobody" as the sender.
+
 2011-01-19  Julien Danjou  <[email protected]>
 
 	* gnus-art.el (gnus-article-add-buttons): Simplify condition.
diff --git a/lisp/spam.el b/lisp/spam.el
index 194668e..3bce276 100644
--- a/lisp/spam.el
+++ b/lisp/spam.el
@@ -2726,9 +2726,8 @@ With a non-nil REMOVE, remove the ADDRESSES."
               (with-current-buffer summary-buffer-name
                 (setq article-string (spam-get-article-as-string article)))
               (when (stringp article-string)
-                (insert "From \n") ; mbox separator (sa-learn only checks the
-                                   ; first five chars, so we can get away with
-                                   ; a bogus line))
+                ;; mbox separator
+                (insert (concat "From nobody " (current-time-string) "\n"))
                 (insert article-string)
                 (insert "\n"))))
           ;; call sa-learn on all messages at the same time

-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.

Summary of changes:
 lisp/ChangeLog |    4 ++++
 lisp/spam.el   |    5 ++---
 2 files changed, 6 insertions(+), 3 deletions(-)

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".

The branch, master has been updated


hooks/post-receive
-- 
Gnus Project
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.