diff options
| author |   Amin Bandali <bandali@gnu.org> | 2020-11-22 00:20:17 -0500 |
|---|---|---|
| committer | Amin Bandali <bandali@gnu.org> | 2020-11-22 00:20:17 -0500 |
| commit | adba94a76d9411bc52b04bfb9b442f4c6c21c285 (patch) | |
| tree | e775a66938b611dbe1d34f3ad9ab2079f9d8c336 /.emacs.d/lisp/bandali-gnus.el | |
| parent | b0d54e4ea8219eaefe380b67365f0384ad280e36 (diff) | |
| download | configs-adba94a76d9411bc52b04bfb9b442f4c6c21c285.tar.gz configs-adba94a76d9411bc52b04bfb9b442f4c6c21c285.tar.xz configs-adba94a76d9411bc52b04bfb9b442f4c6c21c285.zip | |
A few accumulated changes
Diffstat (limited to '.emacs.d/lisp/bandali-gnus.el')
| -rw-r--r-- | .emacs.d/lisp/bandali-gnus.el | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/.emacs.d/lisp/bandali-gnus.el b/.emacs.d/lisp/bandali-gnus.el index bdcc501..671a1cb 100644 --- a/.emacs.d/lisp/bandali-gnus.el +++ b/.emacs.d/lisp/bandali-gnus.el @@ -77,6 +77,8 @@ (list ".*<\\(.*\\)\\.iana\\.org>.*" "l.\\1") ;; orbitalfox (e.g. gemini) (list ".*<\\(.*\\)\\.lists\\.orbitalfox\\.eu>.*" "l.\\1") + ;; haskell + (list ".*<\\(.*\\)\\.haskell\\.org>.*" "l.\\1") ;; *.lists.sr.ht, omitting one dot if present ;; add more \\.?\\([^.]*\\) if needed (list ".*<~\\(.*\\)/\\([^.]*\\)\\.?\\([^.]*\\)\\.lists\\.sr\\.ht>.*" "l.~\\1.\\2\\3") @@ -86,7 +88,6 @@ (list ".*atreus.freelists.org" "l.atreus") (list ".*deepspec.lists.cs.princeton.edu" "l.deepspec") ;; (list ".*haskell-art.we.lurk.org" "l.haskell.art") ;d - (list ".*haskell-cafe.haskell.org" "l.haskell-cafe") ;; (list ".*notmuch.notmuchmail.org" "l.notmuch") ;u (list ".*dev.lists.parabola.nu" "l.parabola-dev") ;; ---------------------------------- @@ -282,6 +283,7 @@ nndraft-directory (concat gnus-home-directory "drafts/") gnus-save-newsrc-file nil gnus-read-newsrc-file nil + gnus-search-use-parsed-queries t gnus-interactive-exit nil gnus-gcc-mark-as-read t) @@ -310,8 +312,8 @@ ;; global key bindings (global-set-key (kbd "s-m") #'gnus-plugged) (global-set-key (kbd "s-M") #'gnus-unplugged) -(global-set-key (kbd "C-c a m") #'gnus-plugged) -(global-set-key (kbd "C-c a M") #'gnus-unplugged) +(global-set-key (kbd "C-c m") #'gnus-plugged) +(global-set-key (kbd "C-c M") #'gnus-unplugged) (with-eval-after-load 'gnus-art (csetq |