;;; (c) 2014 Mark Wooding
;;;
-;;;--------------------------------------------------------------------------
-;;; Random configuration.
-
(setq auth-sources '("~/.gnus.authinfo"))
-(remove-hook 'gnus-mark-article-hook
- 'gnus-summary-mark-read-and-unread-as-read)
-(add-hook 'gnus-mark-article-hook 'gnus-summary-mark-unread-as-read)
-
-(setq gnus-level-unsubscribed 6)
-
;;;--------------------------------------------------------------------------
;;; How to send mail.
(nnimap-split-methods nnimap-split-fancy)
(nnimap-split-fancy ,nnmail-split-fancy)
(nnimap-unsplittable-articles (%Deleted)))
+ (nnimap "mdw-chiark"
+ (nnimap-address "imap.dovecot.chiark.greenend.org.uk")
+ (nnimap-stream starttls)
+ (nnimap-inbox ("INBOX" "to.split"))
+ (nnimap-split-methods nnimap-split-fancy)
+ (nnimap-split-fancy ,nnmail-split-fancy)
+ (nnimap-unsplittable-articles (%Deleted)))
(nnimap "mwooding-chiark"
(nnimap-address "imap.dovecot.chiark.greenend.org.uk")
(nnimap-stream starttls)
- (nnimap-inbox "INBOX")
+ (nnimap-inbox ("INBOX" "to.split"))
+ (nnimap-split-methods nnimap-split-fancy)
+ (nnimap-split-fancy ,nnmail-split-fancy)
(nnimap-unsplittable-articles (%Deleted)))
(nnimap "google"
(nnimap-address "imap.gmail.com")
(nnimap-stream tls)
- (nnimap-inbox "INBOX")
+ (nnimap-inbox ("INBOX" "to.split"))
+ (nnimap-split-methods nnimap-split-fancy)
+ (nnimap-split-fancy ,nnmail-split-fancy)
(nnimap-unsplittable-articles (%Deleted)))))
;; Send sent mail back to me.