From 86ec0408bb7c4e474e55e7ab5580bb7bce8a2782 Mon Sep 17 00:00:00 2001 From: jao Date: Tue, 9 Nov 2021 02:14:29 +0000 Subject: gnus nits --- gnus.org | 21 +++++++++++++-------- 1 file changed, 13 insertions(+), 8 deletions(-) (limited to 'gnus.org') diff --git a/gnus.org b/gnus.org index 1f4afb0..e791919 100644 --- a/gnus.org +++ b/gnus.org @@ -250,16 +250,16 @@ (let ((feeds (seq-difference (directory-files "~/var/mail/feeds") '("emacs" "papers" "trove" "." "..")))) `(("nnml:bigml.inbox" "B" jao-themes-f00) - ("nnselect:bigml.bugs" "b" jao-themes-error) + ("nnml:bigml.bugs" "b" jao-themes-error) ("nnml:bigml.support" "S" default) ("nnml:jao.drivel" "I" jao-themes-f01) ("nnml:bigml.[^ibs]" "W" jao-themes-dimm) - ("nnml:jao.[^d]" "J" jao-themes-dimm) + ("nnml:jao.[^dst]" "J" jao-themes-dimm) ("nnml:local" "l" jao-themes-dimm) ("nnml:feeds.papers" "P" jao-themes-dimm) ("^gmane\\.emacs\\|nnml:feeds.emacs" "E" jao-themes-dimm) (,(format "nnml:feeds.%s" (regexp-opt feeds)) "F" jao-themes-dimm) - ("^gmane\\.[^e]\\|^gwene" "N" jao-themes-dimm)))) + ("^gmane\\.[^e]" "G" jao-themes-dimm)))) (defun jao-gnus--unread-counts () (seq-reduce (lambda (r g) @@ -376,7 +376,7 @@ * Groups buffer #+begin_src emacs-lisp ;; (setq gnus-group-line-format " %m%S%p%P:%~(pad-right 35)c %3y %B\n") - (setq gnus-group-line-format " %m%S%p%3y%P%* %~(pad-right 45)G %B\n") + (setq gnus-group-line-format " %m%S%p%3y%P%* %~(pad-right 40)C %B\n") (setq gnus-topic-line-format "%i[ %(%{%n%}%) -- %A ]%v\n") (setq gnus-group-uncollapsed-levels 2) (setq gnus-auto-select-subject 'unread) @@ -430,10 +430,12 @@ #+end_src * Group parameters #+begin_src emacs-lisp - (setq gnus-permanently-visible-groups "^nnselect:.*") + (setq gnus-permanently-visible-groups "^nnselect:.*-today") (setq gnus-parameters - `(("nnml:local" + `(("^nnselect:.*\\(-today\\|bigml\\.bugs\\)" + (nnselect-rescan . t)) + ("nnml:local" (auto-expire . t) (total-expire . t) (expiry-wait . 1) @@ -486,11 +488,14 @@ (total-expire . t) (expiry-wait . 7) (expiry-target . delete) - (jao-gnus--archiving-group "nnml:feeds/trove")) + (jao-gnus--archiving-group "nnml:feeds.trove")) ("nnml:feeds\\.\\(news\\|emacs\\|prog\\)$" (expiry-wait . 1)) ("nnml:feeds\\.trove" (auto-expire . nil) - (total-expire . nil)))) + (total-expire . nil)) + ("\\(gmane\\|gwene\\)\\..*" + (jao-gnus--archiving-group "nnml:feeds.trove") + (posting-style (address "jao@gnu.org"))))) (dolist (dir '("jao" "bigml" "feeds")) (jao-gnus-nnml--add-maildir dir)) -- cgit v1.2.3