From: Mark Wooding <mdw@distorted.org.uk>
Date: Thu, 2 Jun 2016 17:05:11 +0000 (+0100)
Subject: dot/gnus-local.el.distorted: Changes to support later Gnus versions.
X-Git-Url: https://git.distorted.org.uk/~mdw/profile/commitdiff_plain/df5a4ca5a8febab7a792a0e6c3b29edd92d58686?hp=c7203018088c17c7c5516f62b508f04680c63ca2

dot/gnus-local.el.distorted: Changes to support later Gnus versions.

  * Set authentication credentials source explicitly.

  * Set inboxes for splitting; we don't have the `nnimap-split-inbox'
    file any more.

  * Set unsplittable articles predicate in the new way.
---

diff --git a/dot/gnus-local.el.distorted b/dot/gnus-local.el.distorted
index 466296c..82cc344 100644
--- a/dot/gnus-local.el.distorted
+++ b/dot/gnus-local.el.distorted
@@ -5,6 +5,8 @@
 ;;; (c) 2014 Mark Wooding
 ;;;
 
+(setq auth-sources '("~/.gnus.authinfo"))
+
 ;;;--------------------------------------------------------------------------
 ;;; How to send mail.
 
@@ -55,19 +57,27 @@
       '((nnimap "distorted"
 		(nnimap-address "mail.distorted.org.uk")
 		(nnimap-stream tls)
-		(nnimap-authinfo-file "~/.gnus.authinfo"))
+		(nnimap-authinfo-file "~/.gnus.authinfo")
+		(nnimap-inbox "INBOX")
+		(nnimap-unsplittable-articles (%Deleted)))
 	(nnimap "markw-distorted"
 		(nnimap-address "mail.distorted.org.uk")
 		(nnimap-stream tls)
-		(nnimap-authinfo-file "~/.gnus.authinfo.markw"))
+		(nnimap-authinfo-file "~/.gnus.authinfo.markw")
+		(nnimap-inbox "INBOX")
+		(nnimap-unsplittable-articles (%Deleted)))
 	(nnimap "mwooding-chiark"
 		(nnimap-address "imap.dovecot.chiark.greenend.org.uk")
 		(nnimap-stream tls)
-		(nnimap-authinfo-file "~/.gnus.authinfo"))
+		(nnimap-authinfo-file "~/.gnus.authinfo")
+		(nnimap-inbox "INBOX")
+		(nnimap-unsplittable-articles (%Deleted)))
 	(nnimap "google"
 		(nnimap-address "imap.gmail.com")
 		(nnimap-stream tls)
-		(nnimap-authinfo-file "~/.gnus.authinfo"))))
+		(nnimap-authinfo-file "~/.gnus.authinfo")
+		(nnimap-inbox "INBOX")
+		(nnimap-unsplittable-articles (%Deleted)))))
 
 ;; Send sent mail back to me.
 (setq gnus-message-archive-method "mail"