From 34107b130a2aa5b323ca9e09d4840ca707188866 Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Tue, 4 May 2021 19:58:05 -0500 Subject: Move gnus subscriptions --- gnus.el | 98 +++++++++++++++++++++++++++++++++-------------------------------- 1 file changed, 50 insertions(+), 48 deletions(-) diff --git a/gnus.el b/gnus.el index 8ad5dc5..c5c96a3 100644 --- a/gnus.el +++ b/gnus.el @@ -35,64 +35,20 @@ (add-hook 'gnus-started-hook #'gnus-cloud-download-all-data) (add-hook 'gnus-exit-gnus-hook #'gnus-cloud-upload-all-data) -;;; Gnus subscriptions -(setq gnus-options-subscribe (rx (or ;; all alternatives go under this - (seq string-start - "nnimap+fastmail.com:" - (or ;; folders in Fastmail - "INBOX"))) - (seq string-start - "nntp+news.tilde.club:" - (or ;; news groups in tilde.club - (seq "local." - (or "general")) - (seq "tilde." - (or "art" - "club" - "cosmic" - "food+drink" - "gopher" - "meta" - "poetry" - "services")))))) - -(setq gnus-options-not-subscribe (rx (or ;; all alternatives go under this - (seq string-start - "nnimap+fastmail.com:" - (or ;; folders in Fastmail - "Archive" - "Bulk" - "DeltaChat" - "Gmail" - "Pam" - "Spam" - "Trash" - "blag" - "notes")) - (seq string-start - "nntp+news.tilde.club:" - (or ;; news groups in tilde.club - (seq "tilde." - (or "black" - "javascript" - "nsfw" - "php" - "pink" - "python" - "your"))))))) - ;;; Gnus behavior options (setq gnus-gcc-mark-as-read t message-signature (or (file-exists-p message-signature-file) "~ acdw") gnus-save-newsrc-file nil gnus-read-newsrc-file nil - gnus-interactive-exit nil) + gnus-interactive-exit nil + gnus-use-cache t + gnus-read-active-file 'some) ;;; Other parameters (setq gnus-parameters '(("nnimap\\.*" - (display . all)))) + (display . 200)))) ;;; Gnus UI options (setq gnus-thread-sort-functions '(gnus-thread-sort-by-most-recent-date @@ -170,3 +126,49 @@ bbdb-use-pop-up t bbdb-offer-save 1 bbdb-update-records-p t)) + +;;; Gnus subscriptions +(setq gnus-options-subscribe (rx (or ;; all alternatives go under this + (seq string-start + "nnimap+fastmail.com:" + (or ;; folders in Fastmail + "INBOX"))) + (seq string-start + "nntp+news.tilde.club:" + (or ;; news groups in tilde.club + (seq "local." + (or "general")) + (seq "tilde." + (or "art" + "club" + "cosmic" + "food+drink" + "gopher" + "meta" + "poetry" + "services")))))) + +(setq gnus-options-not-subscribe (rx (or ;; all alternatives go under this + (seq string-start + "nnimap+fastmail.com:" + (or ;; folders in Fastmail + "Archive" + "Bulk" + "DeltaChat" + "Gmail" + "Pam" + "Spam" + "Trash" + "blag" + "notes")) + (seq string-start + "nntp+news.tilde.club:" + (or ;; news groups in tilde.club + (seq "tilde." + (or "black" + "javascript" + "nsfw" + "php" + "pink" + "python" + "your"))))))) -- cgit 1.4.1-21-gabe81