dot/lisp-init.lisp: Get CLisp to save and restore its REPL history.

[profile] / dot / gnus-local.el.distorted

diff --git a/dot/gnus-local.el.distorted b/dot/gnus-local.el.distorted
index 5483fc6..5967b7b 100644 (file)
--- a/dot/gnus-local.el.distorted
+++ b/dot/gnus-local.el.distorted
@@ -5,13 +5,13 @@
 ;;; (c) 2014 Mark Wooding
 ;;;
 
-(setq auth-sources '("~/.gnus.authinfo"))
+(setq auth-sources '("~/.authinfo.gpg"))
 
 ;;;--------------------------------------------------------------------------
 ;;; How to send mail.
 
 (setq smtpmail-smtp-service 587
-      smtpmail-auth-credentials "~/.gnus.authinfo")
+      smtpmail-auth-credentials "~/.authinfo.gpg")
 
 (setq mdw-send-mail-alist
       `((distorted-smtp
@@ -193,15 +193,16 @@
          (from "@picturehouses\\.co\\.uk\\>" "crap.picturehouse" t)
          (from "@nationwide" "crap.nationwide" t)
          (from "nationwide@securesuiteemail\\.com\\>" "crap.nationwide" t)
-         (from "@news\\.spotifymail\\.com\\>" "crap.spotify" t)
+         (from "@\\(.*\\.\\)?spotify\\(mail\\)?\\.com\\>" "crap.spotify" t)
          (from "@action\\.openrightsgroup\\.org\\>" "crap.org" t)
          (from "unlimited@cineworld\\.com\\>" "crap.cineworld" t)
          (from "@tshirthell\\.com\\>" "crap.tshirt-hell" t)
          (from "campaigns@jolla\\.com\\>" "crap.jolla" t)
          (from "@thomann\\.de\\>" "crap.thomann" t)
          (from "@wikimedia\\.org\\>" "crap.wikimedia" t)
-         (from "@gandi\\.net\\>" "crap.gandi" t)
+         (from "@\\(.*\\.\\)?gandi\\.net\\>" "crap.gandi" t)
          (from "@mythic-beasts\\.com\\>" "crap.mythic-beasts" t)
+         (from "@accounts\\.google\\.com\\>" "crap.google" t)
 
          ;; Default.
          "mail.misc"))
@@ -213,6 +214,7 @@
 (setq gnus-secondary-select-methods
       `((nnimap "distorted"
                (nnimap-address "mail.distorted.org.uk")
+               (nnimap-user "mdw")
                (nnimap-stream starttls)
                (nnimap-inbox ("INBOX" "to.split"))
                (nnimap-split-methods nnimap-split-fancy)
@@ -220,6 +222,7 @@
                (nnimap-unsplittable-articles (%Deleted)))
        (nnimap "markw-distorted"
                (nnimap-address "mail.distorted.org.uk")
+               (nnimap-user "markw")
                (nnimap-stream starttls)
                (nnimap-inbox ("INBOX" "to.split"))
                (nnimap-split-methods nnimap-split-fancy)
@@ -227,6 +230,7 @@
                (nnimap-unsplittable-articles (%Deleted)))
        (nnimap "mdw-chiark"
                (nnimap-address "imap.dovecot.chiark.greenend.org.uk")
+               (nnimap-user "mdw")
                (nnimap-stream starttls)
                (nnimap-inbox ("INBOX" "to.split"))
                (nnimap-split-methods nnimap-split-fancy)
@@ -234,6 +238,7 @@
                (nnimap-unsplittable-articles (%Deleted)))
        (nnimap "mwooding-chiark"
                (nnimap-address "imap.dovecot.chiark.greenend.org.uk")
+               (nnimap-user "mwooding")
                (nnimap-stream starttls)
                (nnimap-inbox ("INBOX" "to.split"))
                (nnimap-split-methods nnimap-split-fancy)