gnus: spam detectors config (unused)

1 files changed, 36 insertions, 5 deletions

diff --git a/gnus.org b/gnus.org
index e0b9163..7ba4d17 100644
--- a/gnus.org
+++ b/gnus.org
@@ -153,7 +153,9 @@
 * Local mail
 *** nnml
     #+begin_src emacs-lisp
-      (setq mail-sources '((file :path "/var/mail/jao"))
+      (setq mail-sources '((file :path "/var/mail/jao")
+                           (maildir :path "~/var/mail/spam")
+                           (maildir :path "~/var/mail/trash"))
             gnus-message-archive-group nil
             nnimap-quirks nil)
 
@@ -168,7 +170,8 @@
 
       (setq nnmail-resplit-incoming t
             nnmail-mail-splitting-decodes t
-            nnmail-split-methods 'nnmail-split-fancy)
+            nnmail-split-methods 'nnmail-split-fancy
+            nnml-directory message-directory)
 
       (when jao-gnus-use-nnml
         (add-to-list
@@ -299,6 +302,34 @@
     (eval-after-load "message"
       '(setq message-draft-headers (remove 'Date message-draft-headers)))
   #+END_SRC
+* Spam
+  #+begin_src emacs-lisp
+    (setq jao-gnus-ham-groups ".*\\(bigml\\|jao\\|feeds\\)\\..*"
+          gnus-spam-process-destinations `((,jao-gnus-ham-groups "nnml:spam"))
+          gnus-spam-newsgroup-contents
+          `((".*spam.*" gnus-group-spam-classification-spam)
+            (,jao-gnus-ham-groups gnus-group-spam-classification-ham))
+          gnus-ham-process-destinations
+          '((".*\\(jao\\|feeds\\)\\..*" "jao.inbox")
+            (".*bigml\\..*" "bigml.inbox"))
+          gnus-spam-process-newsgroups
+          `((,jao-gnus-ham-groups ((spam spam-use-bogofilter)
+                                   (ham spam-use-bogofilter)
+                                   (spam spam-use-spamassassin)
+                                   (ham spam-use-spamassassin)
+                                   (spam spam-use-blacklist)))
+            ("nnml:spam" ((ham spam-use-blacklist)
+                          (spam spam-use-bogofilter)
+                          (ham spam-use-bogofilter))))
+          spam-use-blacklist t
+          spam-use-BBDB nil
+          spam-use-bogofilter t
+          spam-use-spamassassin nil
+          spam-spamassassin-program "spamc"
+          spam-split-group "spam")
+
+    ;; (spam-initialize)
+  #+end_src
 * Add-ons
 *** icalendar/org
     #+begin_src emacs-lisp
@@ -408,14 +439,14 @@
     (defvar jao-gnus-image-groups '("xkcd"))
 
     (setq gnus-parameters
-          `(("nnml:local"
+          `(("nnml:\\(local\\|trash\\|spam\\)"
              (auto-expire . t)
              (total-expire . t)
              (expiry-wait . 1)
              (expiry-target . delete))
             ("nnml:jao\\..*"
              (jao-gnus--trash-group "nnml:jao.trash")
-             (jao-gnus--spam-group "nnml:jao.spam")
+             (jao-gnus--spam-group "nnml:spam")
              (jao-gnus--archiving-group "nnml:jao.trove"))
             ("nnml:\\(jao\\|bigml\\)\\.\\(trash\\|spam\\)"
              (gcc-self . nil)
@@ -429,7 +460,7 @@
             ("nnml:bigml\\..*"
              (posting-style (address "jao@bigml.com"))
              (jao-gnus--trash-group "nnml:jao.trash")
-             (jao-gnus--spam-group "nnml:jao.spam")
+             (jao-gnus--spam-group "nnml:spam")
              (jao-gnus--archiving-group "nnml:bigml.trove"))
             ("nnml:bigml\\.inbox"
              (gcc-self . t)