summaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2021-03-07 04:41:36 +0000
committerjao <jao@gnu.org>2021-03-07 04:41:36 +0000
commit1a6c771603c7c6a962d2335802e1a1cad62d2b7a (patch)
tree1b8ea26693ba3e7b88cadc4873006cd096822467
parent7a5097a669e7eb99847049c3413d75d652029bbd (diff)
downloadelibs-1a6c771603c7c6a962d2335802e1a1cad62d2b7a.tar.gz
elibs-1a6c771603c7c6a962d2335802e1a1cad62d2b7a.tar.bz2
more mail cleansing
-rw-r--r--gnus.org28
1 files changed, 8 insertions, 20 deletions
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