From 1a6c771603c7c6a962d2335802e1a1cad62d2b7a Mon Sep 17 00:00:00 2001 From: jao Date: Sun, 7 Mar 2021 04:41:36 +0000 Subject: more mail cleansing --- gnus.org | 28 ++++++++-------------------- 1 file changed, 8 insertions(+), 20 deletions(-) (limited to 'gnus.org') diff --git a/gnus.org b/gnus.org index cee1685..49a9c98 100644 --- a/gnus.org +++ b/gnus.org @@ -3,16 +3,15 @@ #+auto_tangle: t * Feature switching vars - #+BEGIN_SRC emacs-lisp + #+begin_src emacs-lisp (defvar jao-gnus-use-local-imap t) (defvar jao-gnus-use-leafnode t) + (defvar jao-gnus-use-gandi-imap nil) (defvar jao-gnus-use-pm-imap nil) - (defvar jao-gnus-use-gmail nil) (defvar jao-gnus-use-gmane nil) (defvar jao-gnus-use-nnml nil) (defvar jao-gnus-use-maildirs nil) - (defvar jao-gnus-use-nnreddit nil) -#+END_SRC + #+end_src * Looks *** Verbosity #+begin_src emacs-lisp @@ -120,11 +119,9 @@ (nnimap-stream network) (nnimap-server-port 1143)))) - (when jao-gnus-use-gmail + (when jao-gnus-use-gandi-imap (add-to-list 'gnus-secondary-select-methods - '(nnimap "gmail" (nnimap-address "imap.gmail.com"))) - (add-to-list 'gnus-secondary-select-methods - '(nnimap "bigml" (nnimap-address "imap.gmail.com")))) + '(nnimap "gandi" (nnimap-address "mail.gandi.net")))) #+end_src * Mailbox and maildir servers #+begin_src emacs-lisp @@ -165,14 +162,6 @@ dc:date slash:comments slash:description)) - - ;; (use-package nnreddit - ;; :ensure t - ;; :bind (:map gnus-group-mode-map (("R R" . gnus-group-restart)))) - - ;; (when jao-gnus-use-nnreddit - ;; (add-to-list 'gnus-secondary-select-methods '(nnreddit ""))) - #+end_src * Agents, demons, synchronicity #+BEGIN_SRC emacs-lisp @@ -230,6 +219,9 @@ (setq jao-gnus--get-count (1+ jao-gnus--get-count)) (gnus-group-get-new-news (max (if (= 1 jao-gnus--get-count) 4 3) (or arg 0)))) + ;; To limit expiration to the `g' count, `jao-gnus--get-count': + ;; (remove-hook 'gnus-summary-prepare-exit-hook 'gnus-summary-expire-articles) + ;; (define-key gnus-group-mode-map "g" 'jao-gnus-get-new-news) (defun jao-gnus-restart-servers () (interactive) @@ -241,10 +233,6 @@ (message "Restarting all servers... done")) - ;; To limit expiration to the `g' count, `jao-gnus--get-count': - ;; (remove-hook 'gnus-summary-prepare-exit-hook 'gnus-summary-expire-articles) - ;; (define-key gnus-group-mode-map "g" 'jao-gnus-get-new-news) - (define-key gnus-group-mode-map "Z" #'jao-gnus-restart-servers) (define-key gnus-group-mode-map "Gg"#'consult-notmuch) #+END_SRC -- cgit v1.2.3