diff options
| author | Gnus developers <ding@gnus.org.noreply> | 2014-01-31 01:56:00 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka <yamaoka@jpl.org> | 2014-01-31 01:56:00 +0000 |
| commit | 4e2b87d871a623ec36206dff573bf76df8eca12d (patch) | |
| tree | 8e9adbe3a247ce8dd8fe6801afa4a27bb729320a /lisp/gnus/spam.el | |
| parent | a1a04df94c2cdea0f24733aa9b1892ee7ba50b13 (diff) | |
| download | emacs-4e2b87d871a623ec36206dff573bf76df8eca12d.tar.gz | |
Misc bugfixes made in Gnus master
2014-01-31 Alex Schroeder <alex@gnu.org> (tiny change)
* gnus-tut.txt (Message-ID): Typo fix (bug#15556).
2014-01-31 Dave Abrahams <dave@boostpro.com>
* gnus-salt.el (gnus-tree-highlight-article): Don't move point around
in the summary buffer (bug#13769).
2014-01-31 Lars Ingebrigtsen <larsi@gnus.org>
* gnus-art.el (gnus-article-setup-buffer): Refresh the summary buffer
name if we're using a single article buffer. Otherwise, it may point
to a killed buffer (bug#13756).
2014-01-30 Lars Ingebrigtsen <larsi@gnus.org>
* nnmail.el (nnmail-split-it): Instead of redoing the search to restore
the match data, just save and restore it explictly (bug#12375).
* gnus-sum.el (gnus-summary-read-group-1): Initialize the spam code if
that's needed.
* spam.el (spam-initialize): Allow calling repeatedly, but only run the
the code once (bug#9069).
Diffstat (limited to 'lisp/gnus/spam.el')
| -rw-r--r-- | lisp/gnus/spam.el | 42 |
1 files changed, 21 insertions, 21 deletions
diff --git a/lisp/gnus/spam.el b/lisp/gnus/spam.el index d06559676db..82f98c4294f 100644 --- a/lisp/gnus/spam.el +++ b/lisp/gnus/spam.el @@ -2903,25 +2903,27 @@ explicitly, and matters only if you need the extra headers installed through `spam-necessary-extra-headers'." (interactive) - (dolist (var symbols) - (set var t)) - - (dolist (header (spam-necessary-extra-headers)) - (add-to-list 'nnmail-extra-headers header) - (add-to-list 'gnus-extra-headers header)) - - (setq spam-install-hooks t) - ;; TODO: How do we redo this every time the `spam' face is customized? - (push '((eq mark gnus-spam-mark) . spam) - gnus-summary-highlight) - ;; Add hooks for loading and saving the spam stats - (add-hook 'gnus-save-newsrc-hook 'spam-maybe-spam-stat-save) - (add-hook 'gnus-get-top-new-news-hook 'spam-maybe-spam-stat-load) - (add-hook 'gnus-startup-hook 'spam-maybe-spam-stat-load) - (add-hook 'gnus-summary-prepare-exit-hook 'spam-summary-prepare-exit) - (add-hook 'gnus-summary-prepare-hook 'spam-summary-prepare) - (add-hook 'gnus-get-new-news-hook 'spam-setup-widening) - (add-hook 'gnus-summary-prepared-hook 'spam-find-spam)) + (when spam-install-hooks + (dolist (var symbols) + (set var t)) + + (dolist (header (spam-necessary-extra-headers)) + (add-to-list 'nnmail-extra-headers header) + (add-to-list 'gnus-extra-headers header)) + + ;; TODO: How do we redo this every time the `spam' face is customized? + (push '((eq mark gnus-spam-mark) . spam) + gnus-summary-highlight) + ;; Add hooks for loading and saving the spam stats + (add-hook 'gnus-save-newsrc-hook 'spam-maybe-spam-stat-save) + (add-hook 'gnus-get-top-new-news-hook 'spam-maybe-spam-stat-load) + (add-hook 'gnus-startup-hook 'spam-maybe-spam-stat-load) + (add-hook 'gnus-summary-prepare-exit-hook 'spam-summary-prepare-exit) + (add-hook 'gnus-summary-prepare-hook 'spam-summary-prepare) + (add-hook 'gnus-get-new-news-hook 'spam-setup-widening) + (add-hook 'gnus-summary-prepared-hook 'spam-find-spam) + ;; Don't install things more than once. + (setq spam-install-hooks nil))) (defun spam-unload-hook () "Uninstall the spam.el hooks." @@ -2936,8 +2938,6 @@ installed through `spam-necessary-extra-headers'." (add-hook 'spam-unload-hook 'spam-unload-hook) -(when spam-install-hooks - (spam-initialize)) ;;}}} (provide 'spam) |