78 |
(defgroup spam nil |
(defgroup spam nil |
79 |
"Spam configuration.") |
"Spam configuration.") |
80 |
|
|
81 |
(defcustom spam-directory "~/News/spam/" |
(defcustom spam-directory (nnheader-concat gnus-directory "spam/") |
82 |
"Directory for spam whitelists and blacklists." |
"Directory for spam whitelists and blacklists." |
83 |
:type 'directory |
:type 'directory |
84 |
:group 'spam) |
:group 'spam) |
1814 |
(remove-hook 'gnus-get-new-news-hook 'spam-setup-widening) |
(remove-hook 'gnus-get-new-news-hook 'spam-setup-widening) |
1815 |
(remove-hook 'gnus-summary-prepare-hook 'spam-find-spam)) |
(remove-hook 'gnus-summary-prepare-hook 'spam-find-spam)) |
1816 |
|
|
1817 |
|
(add-hook 'spam-unload-hook 'spam-unload-hook) |
1818 |
|
|
1819 |
(when spam-install-hooks |
(when spam-install-hooks |
1820 |
(spam-initialize)) |
(spam-initialize)) |
1821 |
|
|
1822 |
(provide 'spam) |
(provide 'spam) |
1823 |
|
|
|
;;; spam.el ends here. |
|
|
|
|
|
(provide 'spam) |
|
|
|
|
1824 |
;;; arch-tag: 07e6e0ca-ab0a-4412-b445-1f6c72a4f27f |
;;; arch-tag: 07e6e0ca-ab0a-4412-b445-1f6c72a4f27f |
1825 |
;;; spam.el ends here |
;;; spam.el ends here |