aboutsummaryrefslogtreecommitdiff
path: root/.config/emacs/lisp/evil-collection/modes/gnus
diff options
context:
space:
mode:
authorJack Jamison <jackqjamison@gmail.com>2026-07-05 01:19:30 -0400
committerJack Jamison <jackqjamison@gmail.com>2026-07-05 01:19:30 -0400
commitbdf9a71ab7baa2b1de9abcfd5df1a9107a55d141 (patch)
treec4524e6c41aa5107211103401dabfaefc81aa882 /.config/emacs/lisp/evil-collection/modes/gnus
parentfe3984f541bd32bdfa418afb305b614176b55ca0 (diff)
add a bunch of emacs packages HELP
Diffstat (limited to '.config/emacs/lisp/evil-collection/modes/gnus')
-rw-r--r--.config/emacs/lisp/evil-collection/modes/gnus/README.org274
-rw-r--r--.config/emacs/lisp/evil-collection/modes/gnus/evil-collection-gnus.el491
2 files changed, 765 insertions, 0 deletions
diff --git a/.config/emacs/lisp/evil-collection/modes/gnus/README.org b/.config/emacs/lisp/evil-collection/modes/gnus/README.org
new file mode 100644
index 0000000..d9a8ae2
--- /dev/null
+++ b/.config/emacs/lisp/evil-collection/modes/gnus/README.org
@@ -0,0 +1,274 @@
+* gnus
+
+ Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/gnus/index.html][Gnus]]. Initial state is normal in every gnus mode below,
+ insert state is inhibited, and =zz= is bound to =gnus-recenter= everywhere.
+ Each map keeps the bulk of its upstream alphabetic prefixes (=A=, =B=, =G=,
+ =M=, =S=, =W=, =X=, =Y=, =Z=, =/=, etc.); the tables below cover only what
+ evil-collection relocates or adds.
+
+** Key bindings
+
+*** gnus-summary-mode-map
+
+ | Command | Original | Evil |
+ |-----------------------------------------------+----------------+----------------|
+ | =gnus-summary-exit= | =q= | =q=, =ZZ= |
+ | =gnus-summary-exit-no-update= | =Q= | =Q=, =ZQ= |
+ | =gnus-summary-help-map= | =H= | =g?= |
+ | =gnus-summary-widget-forward= | n/a | =TAB= |
+ | =gnus-summary-widget-backward= | n/a | =<backtab>= |
+ | =gnus-summary-next-page= | =SPC= | =SPC= |
+ | =gnus-summary-prev-page= | =DEL=, =S-SPC= | =DEL=, =S-SPC= |
+ | =gnus-summary-scroll-up= | =RET= | =RET= |
+ | =gnus-summary-prev-unread-article= | =p= | =gk=, =[[= |
+ | =gnus-summary-next-unread-article= | =n= | =gj=, =]]= |
+ | =gnus-summary-prev-thread= | =M-b= | ={= |
+ | =gnus-summary-next-thread= | =M-f= | =}= |
+ | =gnus-summary-prev-article= | =P= | =C-k= |
+ | =gnus-summary-next-article= | =N= | =C-j= |
+ | =gnus-summary-mark-as-processable= | =#= | =m= |
+ | =gnus-uu-mark-buffer= | (M H b) | =M= |
+ | =gnus-summary-unmark-as-processable= | =M-#= | =u= |
+ | =gnus-summary-unmark-all-processable= | (M H U) | =U= |
+ | =gnus-uu-mark-by-regexp= | (M P r) | =%= |
+ | =gnus-summary-mail-other-window= | =m= | =C=, =cc= |
+ | =gnus-summary-news-other-window= | (S i) | =ci= |
+ | =gnus-summary-followup= | =f= | =f=, =cf= |
+ | =gnus-summary-followup-with-original= | =F= | =F=, =cF= |
+ | =gnus-summary-reply= | =r= | =r=, =cr= |
+ | =gnus-summary-reply-with-original= | =R= | =R=, =cR= |
+ | =gnus-summary-very-wide-reply= | (S W) | =cw= |
+ | =gnus-summary-very-wide-reply-with-original= | (S W) | =cW= |
+ | =gnus-summary-mail-forward= | =C-c C-f= | =C-c C-f= |
+ | =gnus-summary-first-unread-article= | (G f) | =.= |
+ | =gnus-summary-best-unread-article= | (G b) | =,= |
+ | =gnus-summary-mark-as-read-forward= | =d= | =!= |
+ | =gnus-summary-tick-article-forward= | =u=, =!= | === |
+ | =gnus-summary-goto-article= | =j= | =J= |
+ | =gnus-summary-rescan-group= | =M-g= | =gr= |
+ | =gnus-summary-edit-article= | =e= | =e= |
+ | =gnus-summary-mark-as-expirable= | =E= | =E= |
+ | =gnus-summary-limit-map= | =/= | =z/= |
+ | =gnus-summary-toggle-header= | =t= | =zt= |
+ | =gnus-summary-limit-to-unread= | =x= | =x= |
+ | =gnus-summary-browse-url= | =w= | =gX= |
+ | =gnus-summary-refer-parent-article= | =^= | =^= |
+ | =gnus-summary-refer-article= | =M-^= | =M-^= |
+ | =gnus-summary-kill-thread= | (T K) | =Tk= |
+ | =gnus-summary-lower-thread= | =M-l= | =Tl= |
+ | =gnus-summary-raise-thread= | (T I) | =Ti= |
+ | =gnus-uu-mark-thread= | (T #) | =Tm= |
+ | =gnus-uu-unmark-thread= | (T M-#) | =Tu= |
+ | =gnus-summary-toggle-threads= | =M-t= | =TT= |
+ | =gnus-summary-show-thread= | =M-s= | =Ts=, =zo= |
+ | =gnus-summary-hide-thread= | =M-h= | =Th=, =zc= |
+ | =gnus-summary-show-all-threads= | (T S) | =TS= |
+ | =gnus-summary-hide-all-threads= | (T H) | =TH= |
+ | =gnus-summary-rethread-current= | (T t) | =Tt= |
+ | =gnus-summary-reparent-thread= | (T ^) | =T^= |
+ | =gnus-summary-reparent-children= | (T M-^) | =T M-^= |
+ | =gnus-summary-next-thread= | =M-f= | =Tn= |
+ | =gnus-summary-prev-thread= | =M-b= | =Tp= |
+ | =gnus-summary-down-thread= | (T d) | =Td= |
+ | =gnus-summary-up-thread= | (T u) | =Ta= |
+ | =gnus-summary-top-thread= | (T o) | =To= |
+ | =gnus-summary-search-article-forward= | =M-s= | =M-s= |
+ | =gnus-summary-search-article-backward= | =M-r= | =M-r= |
+ | =gnus-summary-repeat-search-article-forward= | =M-S= | =M-S= |
+ | =gnus-summary-repeat-search-article-backward= | =M-R= | =M-R= |
+ | =gnus-summary-execute-command= | =&= | =&= |
+ | =gnus-summary-universal-argument= | =M-&= | =M-&= |
+ | =gnus-cache-enter-article= | =*= | =*= |
+ | =gnus-cache-remove-article= | =M-*= | =M-*= |
+ | =gnus-summary-increase-score= | =I= | =I= |
+ | =gnus-summary-lower-score= | =L= | =L= |
+
+ Grouped relocations:
+
+ - Sort (=o= prefix): =oa= author, =oc= chars, =od= date, =oi= score, =ol=
+ lines, =omd= most-recent-date, =omm= marks, =omn= most-recent-number,
+ =on= number, =oo= original, =or= random, =os= subject, =ot= recipient.
+ - Save (=O= prefix, was upstream =O=): =Oo= article, =Om= mail, =Or= rmail,
+ =Of= file, =OF= write-article-file, =Ob= body-file, =Oh= folder, =Ov= vm,
+ =Op= pipe-output, =OP= muttprint. =gnus-summary-pipe-output= is also on
+ the literal pipe key.
+ - Decode (=X= prefix): =Xu/XU/Xvu/XvU= uu, =Xs/XS/Xvs/XvS= unshar,
+ =Xp/XP/Xvp/XvP= postscript, =Xo= save, =Xb= binhex, =XY= yenc.
+ - Mail-group ops (=B= prefix): =Be= expire, =BE= expire-now, =Bd= delete,
+ =Bm= move, =Bc= copy, =Bb= crosspost, =Bi= import, =BI= create, =Br=
+ respool, =Bw= edit, =Bq= respool-query, =Bt= respool-trace, =Bp=
+ article-posted-p.
+
+*** gnus-article-mode-map
+
+ Motion-state additions:
+
+ | Command | Original | Evil |
+ |-----------------------------------------+----------+------|
+ | =gnus-article-followup-with-original= | =F= | =F= |
+ | =gnus-article-reply-with-original= | =R= | =R= |
+ | =gnus-article-wide-reply-with-original= | =W= | =W= |
+
+ Normal-state:
+
+ | Command | Original | Evil |
+ |-----------------------------------------+----------------+----------------------|
+ | =evil-window-delete= | n/a | =q=, =Q=, =ZZ=, =ZQ= |
+ | =forward-button= | =TAB= | =TAB= |
+ | =backward-button= | =<backtab>= | =<backtab>= |
+ | =gnus-article-goto-next-page= | =SPC= | =SPC= |
+ | =gnus-article-goto-prev-page= | =DEL=, =S-SPC= | =DEL=, =S-SPC= |
+ | =gnus-summary-reply= | =r= | =r=, =cr= |
+ | =gnus-article-reply-with-original= | =R= | =R= |
+ | =gnus-article-mail= | =C-c m= | =C=, =cc= |
+ | =gnus-summary-reply-with-original= | n/a | =cR= |
+ | =gnus-summary-followup= | n/a | =cf= |
+ | =gnus-summary-followup-with-original= | n/a | =cF= |
+ | =gnus-summary-very-wide-reply= | n/a | =cw= |
+ | =gnus-article-wide-reply-with-original= | n/a | =cW= |
+ | =gnus-summary-mail-forward= | =C-c C-f= | =C-c C-f= |
+ | =gnus-article-refer-article= | =C-c ^= | =C-]= |
+ | =gnus-article-show-summary= | =h=, =s= | =s= |
+ | =gnus-summary-show-article= | =g= | =gr= |
+ | =gnus-summary-browse-url= | n/a | =gX= |
+
+ Washing commands move under the =zw= prefix:
+
+ | Command | Original | Evil |
+ |-------------------------------------------+----------+--------|
+ | =gnus-summary-stop-page-breaking= | =W l= | =zwl= |
+ | =gnus-summary-caesar-message= | =W r= | =zwr= |
+ | =gnus-summary-morse-message= | =W m= | =zwm= |
+ | =gnus-summary-idna-message= | =W i= | =zwi= |
+ | =gnus-summary-toggle-header= | =t= | =zwt= |
+ | =gnus-summary-verbose-headers= | =W v= | =zwv= |
+ | =gnus-article-treat-overstrike= | =W o= | =zwo= |
+ | =gnus-article-treat-smartquotes= | =W d= | =zwd= |
+ | =gnus-article-treat-non-ascii= | =W U= | =zwu= |
+ | =gnus-article-outlook-deuglify-article= | =W Y f= | =zwyf= |
+ | =gnus-article-outlook-unwrap-lines= | =W Y u= | =zwyu= |
+ | =gnus-article-outlook-repair-attribution= | =W Y a= | =zwya= |
+ | =gnus-article-outlook-rearrange-citation= | =W Y c= | =zwyc= |
+ | =gnus-article-fill-cited-article= | =W w= | =zww= |
+ | =gnus-article-fill-long-lines= | =W Q= | =zwq= |
+ | =gnus-article-capitalize-sentences= | =W C= | =zwc= |
+ | =gnus-article-de-base64-unreadable= | =W 6= | =zw6= |
+ | =gnus-article-decode-HZ= | =W Z= | =zwz= |
+ | =gnus-article-treat-ansi-sequences= | =W A= | =zwa= |
+ | =gnus-article-add-buttons= | =W b= | =zwb= |
+ | =gnus-article-add-buttons-to-head= | =W B= | =zwB= |
+ | =gnus-article-verify-x-pgp-sig= | =W p= | =zwp= |
+ | =gnus-summary-force-verify-and-decrypt= | =W s= | =zws= |
+
+*** gnus-group-mode-map
+
+ | Command | Original | Evil |
+ |------------------------------------------+-------------+------------|
+ | =gnus-group-exit= | =q= | =q=, =ZZ= |
+ | =gnus-group-quit= | =Q= | =Q=, =ZQ= |
+ | =gnus-group-prev-unread-group= | =p= | =gk=, =[[= |
+ | =gnus-group-next-unread-group= | =n= | =gj=, =]]= |
+ | =gnus-group-next-group= | =N= | =C-j= |
+ | =gnus-group-prev-group= | =P= | =C-k= |
+ | =gnus-group-mail= | =m= | =C=, =cc= |
+ | =gnus-group-news= | =i= | =ci= |
+ | =gnus-group-first-unread-group= | =.= | =.= |
+ | =gnus-group-best-unread-group= | =,= | =,= |
+ | =gnus-activate-all-groups= | =M-g M-a= | =A= |
+ | =gnus-group-browse-foreign-server= | =B= | =B= |
+ | =gnus-group-edit-group= | =M-e= | =E= |
+ | =gnus-group-find-new-groups= | =F= | =F= |
+ | =gnus-group-jump-to-group= | =j= | =J= |
+ | =gnus-group-rename-group= | (G r) | =R= |
+ | =gnus-group-expunge-group= | (G x) | =X= |
+ | =gnus-group-select-group= | =RET= | =RET= |
+ | =gnus-group-read-group= | =SPC= | =SPC= |
+ | =gnus-group-get-new-news-this-group= | =g= | =gr= |
+ | =gnus-group-get-new-news= | =g= | =gR= |
+ | =gnus-group-unsubscribe-current-group= | =u= | =gu= |
+ | =gnus-group-unsubscribe-group= | =U= | =gU= |
+ | =gnus-group-catchup-current= | =c= | =gc= |
+ | =gnus-group-catchup-current-all= | =C= | =gC= |
+ | =gnus-group-expire-articles= | =C-c M-x= | =ge= |
+ | =gnus-group-expire-all-groups= | =C-c M-C-x= | =gE= |
+ | =gnus-group-set-current-level= | (G S l) | =gl= |
+ | =gnus-group-kill-group= | =C-k= | =dd=, =D= |
+ | =gnus-group-yank-group= | =C-y= | =p=, =P= |
+ | =gnus-group-mark-group= | =#= | =m= |
+ | =gnus-group-unmark-group= | =M-#= | =u= |
+ | =gnus-group-unmark-all-groups= | (M U) | =U= |
+ | =gnus-group-mark-buffer= | (M b) | =M=, =*= |
+ | =gnus-group-mark-regexp= | (M r) | =%= |
+ | =gnus-group-apropos= | =C-c M-a= | =s= |
+ | =gnus-group-description-apropos= | =C-c M-A= | =S= |
+ | =gnus-group-read-ephemeral-search-group= | n/a | =M-s= |
+ | =gnus-group-enter-server-mode= | =^= | =^= |
+ | =gnus-group-prev-unread-group= | =DEL= | =DEL= |
+ | =gnus-group-help-map= | =H= | =g?= |
+
+ Grouped relocations:
+
+ - Sort (=o= prefix): =oa= alphabet, =ol= level, =om= method, =on=
+ real-name, =or= rank, =os= sort, =ou= unread, =ov= score.
+ - List (=L= prefix, was upstream =A=): =L!= ticked, =L/= limit-map, =L?=
+ dormant, =La= active, =Lc= cached, =Lf= flush-map, =Lk= killed, =Ll=
+ level, =Lm= matching, =LM= all-matching, =Lp= plus-map, =Ls= groups,
+ =Lu= all-groups, =Lz= zombies.
+ - Topic (=T= prefix): =Tn= create, =Tj= jump, =Tr= rename, =Td= delete;
+ =zo= / =zc= show/hide topic. Topic sort under =To{a,u,l,v,r,m,e,s}=.
+
+*** gnus-server-mode-map
+
+ | Command | Original | Evil |
+ |--------------------------------------------+----------+----------------------|
+ | =gnus-server-exit= | =q= | =q=, =Q=, =ZZ=, =ZQ= |
+ | =gnus-server-read-server= | =RET= | =RET= |
+ | =gnus-server-read-server-in-server-buffer= | =SPC= | =SPC= |
+ | =gnus-server-close-server= | =C= | =C= |
+ | =gnus-server-deny-server= | =D= | =D= |
+ | =gnus-group-make-nnir-group= | =G= | =G= |
+ | =gnus-server-set-cloud-method-server= | =I= | =I= |
+ | =gnus-server-offline-server= | =L= | =L= |
+ | =gnus-server-open-server= | =O= | =O= |
+ | =gnus-server-remove-denials= | =R= | =R= |
+ | =gnus-server-show-server= | =S= | =S= |
+ | =gnus-server-add-server= | =a= | =a= |
+ | =gnus-server-copy-server= | =c= | =y= |
+ | =gnus-server-edit-server= | =e= | =e= |
+ | =gnus-server-regenerate-server= | =g= | =gr= |
+ | =gnus-server-toggle-cloud-server= | =i= | =i= |
+ | =gnus-server-kill-server= | =k= | =d= |
+ | =gnus-server-list-servers= | =l= | =L= |
+ | =gnus-server-scan-server= | =s= | =s= |
+ | =gnus-server-yank-server= | =y= | =p= |
+ | =gnus-server-compact-server= | =z= | =c= |
+ | =gnus-server-close-all-servers= | =M-c= | =M-c= |
+ | =gnus-server-open-all-servers= | =M-o= | =M-o= |
+
+*** gnus-browse-mode-map
+
+ | Command | Original | Evil |
+ |-----------------------------------------+----------+----------------------|
+ | =gnus-browse-exit= | =q=, =l= | =q=, =Q=, =ZZ=, =ZQ= |
+ | =gnus-browse-unsubscribe-current-group= | =u= | =u= |
+ | =gnus-browse-read-group= | =SPC= | =SPC= |
+ | =gnus-browse-select-group= | =RET= | =RET= |
+
+*** gnus-bookmark-bmenu-mode-map
+
+ | Command | Original | Evil |
+ |--------------------------------------------+----------+----------------------|
+ | =quit-window= | =q= | =q=, =Q=, =ZZ=, =ZQ= |
+ | =gnus-bookmark-bmenu-mark= | =m= | =m= |
+ | =gnus-bookmark-bmenu-unmark= | =u= | =u= |
+ | =gnus-bookmark-bmenu-backup-unmark= | =DEL= | =DEL= |
+ | =gnus-bookmark-bmenu-delete= | =d=, =k= | =d= |
+ | =gnus-bookmark-bmenu-execute-deletions= | =x= | =x= |
+ | =gnus-bookmark-bmenu-select= | =RET= | =RET= |
+ | =gnus-bookmark-bmenu-load= | =l= | =L= |
+ | =gnus-bookmark-bmenu-save= | =s= | =s= |
+ | =gnus-bookmark-bmenu-toggle-infos= | =t= | =t= |
+ | =gnus-bookmark-bmenu-show-details= | =a= | =a= |
+ | =gnus-bookmark-bmenu-show-all-annotations= | n/a | =A= |
+ | =gnus-bookmark-bmenu-edit-annotation= | n/a | =E= |
+ | =gnus-bookmark-bmenu-rename= | n/a | =R= |
diff --git a/.config/emacs/lisp/evil-collection/modes/gnus/evil-collection-gnus.el b/.config/emacs/lisp/evil-collection/modes/gnus/evil-collection-gnus.el
new file mode 100644
index 0000000..cc6b413
--- /dev/null
+++ b/.config/emacs/lisp/evil-collection/modes/gnus/evil-collection-gnus.el
@@ -0,0 +1,491 @@
+;;; evil-collection-gnus.el --- Bindings for `gnus' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2019 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "26.3"))
+;; Keywords: emacs, tools, evil
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program. If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `gnus'.
+
+;;; Code:
+(require 'gnus nil t)
+(require 'evil-collection)
+
+(defconst evil-collection-gnus-maps '(gnus-article-mode-map
+ gnus-bookmark-bmenu-mode-map
+ gnus-browse-mode-map
+ gnus-group-mode-map
+ gnus-server-mode-map
+ gnus-summary-mode-map))
+
+(defvar evil-collection-gnus-common-normal-bindings
+ '("zz" gnus-recenter)
+ "Keybindings added to all gnus normal mode-maps.
+Note that there is no gnus-common-mode-map")
+
+;;;###autoload
+(defun evil-collection-gnus-setup ()
+ "Set up `evil' bindings for `gnus'."
+
+ ;; For all gnus modes:
+ ;; - Set the initial state to 'normal
+ ;; - Inhibit insert
+ ;; - Use `evil-collection-gnus-common-normal-bindings'
+ (dolist (map evil-collection-gnus-maps)
+ (let* ((map-string (symbol-name map))
+ (mode-string (string-trim-right map-string "-map"))
+ (mode (intern mode-string)))
+ (evil-set-initial-state mode 'normal)
+ (evil-collection-inhibit-insert-state map)
+ (apply #'evil-collection-define-key 'normal map
+ evil-collection-gnus-common-normal-bindings)))
+
+ (evil-collection-define-key 'normal 'gnus-summary-mode-map
+ ;; quit
+ "Q" 'gnus-summary-exit-no-update
+ "ZQ" 'gnus-summary-exit-no-update
+ "q" 'gnus-summary-exit
+ "ZZ" 'gnus-summary-exit
+
+ "g?" 'gnus-summary-help-map
+
+ ;; motion
+ (kbd "<tab>") 'gnus-summary-widget-forward
+ (kbd "<backtab>") 'gnus-summary-widget-backward
+ (kbd "<delete>") 'gnus-summary-prev-page
+ (kbd "S-SPC") 'gnus-summary-prev-page
+ (kbd "SPC") 'gnus-summary-next-page
+ (kbd "RET") 'gnus-summary-scroll-up
+ "gk" 'gnus-summary-prev-unread-article
+ "gj" 'gnus-summary-next-unread-article
+ "[[" 'gnus-summary-prev-unread-article
+ "]]" 'gnus-summary-next-unread-article
+ "{" 'gnus-summary-prev-thread
+ "}" 'gnus-summary-next-thread
+ (kbd "C-j") 'gnus-summary-next-article
+ (kbd "C-k") 'gnus-summary-prev-article
+
+ ;; Marking
+ "m" 'gnus-summary-mark-as-processable
+ "M" 'gnus-uu-mark-buffer
+ "u" 'gnus-summary-unmark-as-processable
+ "U" 'gnus-summary-unmark-all-processable
+ "%" 'gnus-uu-mark-by-regexp
+
+ ;; Composing
+ "C" 'gnus-summary-mail-other-window
+ "cc" 'gnus-summary-mail-other-window
+ "ci" 'gnus-summary-news-other-window
+ "f" 'gnus-summary-followup
+ "F" 'gnus-summary-followup-with-original
+ "cf" 'gnus-summary-followup
+ "cF" 'gnus-summary-followup-with-original
+
+ ;; Reply
+ "r" 'gnus-summary-reply
+ "R" 'gnus-summary-reply-with-original
+ "cr" 'gnus-summary-reply
+ "cR" 'gnus-summary-reply-with-original
+ "cw" 'gnus-summary-very-wide-reply
+ "cW" 'gnus-summary-very-wide-reply-with-original
+ (kbd "C-c C-f") 'gnus-summary-mail-forward
+
+ ;; Actions, like mu4e
+ ;; Keep the following two bindings consistent with group's
+ "." 'gnus-summary-first-unread-article
+ "," 'gnus-summary-best-unread-article
+ "!" 'gnus-summary-mark-as-read-forward
+ "=" 'gnus-summary-tick-article-forward
+ "J" 'gnus-summary-goto-article
+ "gr" 'gnus-summary-rescan-group
+ "e" 'gnus-summary-edit-article
+ "E" 'gnus-summary-mark-as-expirable
+ "z/" 'gnus-summary-limit-map
+ "zt" 'gnus-summary-toggle-header
+ "x" 'gnus-summary-limit-to-unread
+ "gX" 'gnus-summary-browse-url
+
+ ;; Finding the parent
+ "^" 'gnus-summary-refer-parent-article
+ (kbd "M-^") 'gnus-summary-refer-article
+
+ ;; Sorting
+ "oa" 'gnus-summary-sort-by-author
+ "oc" 'gnus-summary-sort-by-chars
+ "od" 'gnus-summary-sort-by-date
+ "oi" 'gnus-summary-sort-by-score
+ "ol" 'gnus-summary-sort-by-lines
+ "omd" 'gnus-summary-sort-by-most-recent-date
+ "omm" 'gnus-summary-sort-by-marks
+ "omn" 'gnus-summary-sort-by-most-recent-number
+ "on" 'gnus-summary-sort-by-number
+ "oo" 'gnus-summary-sort-by-original
+ "or" 'gnus-summary-sort-by-random
+ "os" 'gnus-summary-sort-by-subject
+ "ot" 'gnus-summary-sort-by-recipient
+
+ ;; Threads commands
+ "Tk" 'gnus-summary-kill-thread
+ "Tl" 'gnus-summary-lower-thread
+ "Ti" 'gnus-summary-raise-thread
+ "Tm" 'gnus-uu-mark-thread ;; was T #
+ "Tu" 'gnus-uu-unmark-thread ;; was T M-#
+ "TT" 'gnus-summary-toggle-threads
+ "Ts" 'gnus-summary-show-thread
+ "Th" 'gnus-summary-hide-thread
+ ;; show/hide can be mapped to zo/zc
+ "zo" 'gnus-summary-show-thread
+ "zc" 'gnus-summary-hide-thread
+ "TS" 'gnus-summary-show-all-threads
+ "TH" 'gnus-summary-hide-all-threads
+ "Tt" 'gnus-summary-rethread-current
+ "T^" 'gnus-summary-reparent-thread
+ (kbd "T M-^") 'gnus-summary-reparent-children
+ "Tn" 'gnus-summary-next-thread
+ "Tp" 'gnus-summary-prev-thread
+ "Td" 'gnus-summary-down-thread ;; descend
+ "Ta" 'gnus-summary-up-thread ;; was T u, ascend also makes sense
+ "To" 'gnus-summary-top-thread
+
+ ;; Saving
+ "Oo" 'gnus-summary-save-article
+ "Om" 'gnus-summary-save-article-mail
+ "Or" 'gnus-summary-save-article-rmail
+ "Of" 'gnus-summary-save-article-file
+ "OF" 'gnus-summary-write-article-file
+ "Ob" 'gnus-summary-save-article-body-file
+ "Oh" 'gnus-summary-save-article-folder
+ "Ov" 'gnus-summary-save-article-vm
+ "Op" 'gnus-summary-pipe-output
+ "|" 'gnus-summary-pipe-output
+ "OP" 'gnus-summary-muttprint
+
+ ;; Decoding with marked articles
+ "Xu" 'gnus-uu-decode-uu
+ "XU" 'gnus-uu-decode-uu-and-save
+ "Xvu" 'gnus-uu-decode-uu-view
+ "XvU" 'gnus-uu-decode-uu-and-save-view
+ ;; Shell archives
+ "Xs" 'gnus-uu-decode-unshar
+ "XS" 'gnus-uu-decode-unshar-and-save
+ "Xvs" 'gnus-uu-decode-unshar-view
+ "XvS" 'gnus-uu-decode-unshar-and-save-view
+ ;; PostScript files
+ "Xp" 'gnus-uu-decode-postscript
+ "XP" 'gnus-uu-decode-postscript-and-save
+ "Xvp" 'gnus-uu-decode-postscript-view
+ "XvP" 'gnus-uu-decode-postscript-and-save-view
+ ;; Other files
+ "Xo" 'gnus-uu-decode-save
+ "Xb" 'gnus-uu-decode-binhex
+ "XY" 'gnus-uu-decode-yenc
+
+ ;; Mail group commands
+ "Be" 'gnus-summary-expire-articles
+ "BE" 'gnus-summary-expire-articles-now ;; was B C-M-e
+ "Bd" 'gnus-summary-delete-article ;; was B DEL
+ "Bm" 'gnus-summary-move-article
+ "Bc" 'gnus-summary-copy-article
+ "Bb" 'gnus-summary-crosspost-article ;; was B B
+ "Bi" 'gnus-summary-import-article
+ "BI" 'gnus-summary-create-article
+ "Br" 'gnus-summary-respool-article
+ "Bw" 'gnus-summary-edit-article
+ "Bq" 'gnus-summary-respool-query
+ "Bt" 'gnus-summary-respool-trace
+ "Bp" 'gnus-summary-article-posted-p
+
+ ;; Searching
+ (kbd "M-s") 'gnus-summary-search-article-forward
+ (kbd "M-r") 'gnus-summary-search-article-backward
+ (kbd "M-S") 'gnus-summary-repeat-search-article-forward
+ (kbd "M-R") 'gnus-summary-repeat-search-article-backward
+ "&" 'gnus-summary-execute-command
+ (kbd "M-&") 'gnus-summary-universal-argument
+
+ [mouse-2] 'gnus-mouse-pick-article
+ [follow-link] 'mouse-face
+
+ ;; Rest of the bindings "as is".
+ "*" 'gnus-cache-enter-article
+ (kbd "M-*") 'gnus-cache-remove-article
+ (kbd "M-i") 'gnus-symbolic-argument
+ "I" 'gnus-summary-increase-score
+ "L" 'gnus-summary-lower-score)
+
+ (evil-collection-define-key 'motion 'gnus-article-mode-map
+ "F" 'gnus-article-followup-with-original
+ "R" 'gnus-article-reply-with-original
+ "W" 'gnus-article-wide-reply-with-original)
+ (evil-collection-define-key 'normal 'gnus-article-mode-map
+ ;; quit
+ "Q" 'evil-window-delete
+ "ZQ" 'evil-window-delete
+ "q" 'evil-window-delete
+ "ZZ" 'evil-window-delete
+
+ ;; Movement
+ (kbd "TAB") 'forward-button
+ (kbd "<backtab>") 'backward-button
+ (kbd "SPC") 'gnus-article-goto-next-page
+ (kbd "DEL") 'gnus-article-goto-prev-page
+ (kbd "S-SPC") 'gnus-article-goto-prev-page
+
+ ;; Reply
+ "r" 'gnus-summary-reply
+ "R" 'gnus-article-reply-with-original ;; override `evil-replace-state'
+
+ ;; Composing
+ "C" 'gnus-article-mail
+ "cc" 'gnus-article-mail
+ "cr" 'gnus-summary-reply
+ "cR" 'gnus-summary-reply-with-original
+ "cf" 'gnus-summary-followup
+ "cF" 'gnus-summary-followup-with-original
+ "cw" 'gnus-summary-very-wide-reply
+ "cW" 'gnus-article-wide-reply-with-original
+ (kbd "C-c C-f") 'gnus-summary-mail-forward
+
+ ;; Washing
+ ;;
+ ;; List of unbound commands:
+ ;; - `gnus-article-remove-cr'
+ ;; - `gnus-article-de-quoted-unreadable'
+ ;; - `gnus-article-unsplit-urls'
+ ;; - `gnus-article-wash-html'
+ ;; - `gnus-article-strip-leading-blank-lines'
+ ;; - `gnus-article-strip-multiple-blank-lines'
+ ;; - `gnus-article-remove-trailing-blank-lines'
+ ;; - `gnus-article-strip-blank-lines'
+ ;; - `gnus-article-strip-all-blank-lines'
+ ;; - `gnus-article-strip-leading-space'
+ ;; - `gnus-article-strip-trailing-space'
+ "zwl" 'gnus-summary-stop-page-breaking
+ "zwr" 'gnus-summary-caesar-message
+ "zwm" 'gnus-summary-morse-message
+ "zwi" 'gnus-summary-idna-message
+ "zwt" 'gnus-summary-toggle-header
+ "zwv" 'gnus-summary-verbose-headers
+ "zwo" 'gnus-article-treat-overstrike
+ "zwd" 'gnus-article-treat-smartquotes
+ "zwu" 'gnus-article-treat-non-ascii ;; was W U
+ "zwyf" 'gnus-article-outlook-deuglify-article
+ "zwyu" 'gnus-article-outlook-unwrap-lines
+ "zwya" 'gnus-article-outlook-repair-attribution
+ "zwyc" 'gnus-article-outlook-rearrange-citation
+ "zww" 'gnus-article-fill-cited-article
+ "zwq" 'gnus-article-fill-long-lines ;; was W Q
+ "zwc" 'gnus-article-capitalize-sentences ;; was W C
+ "zw6" 'gnus-article-de-base64-unreadable
+ "zwz" 'gnus-article-decode-HZ ;; was W Z
+ "zwa" 'gnus-article-treat-ansi-sequences ;; was W A
+ "zwb" 'gnus-article-add-buttons
+ "zwB" 'gnus-article-add-buttons-to-head
+ "zwp" 'gnus-article-verify-x-pgp-sig
+ "zws" 'gnus-summary-force-verify-and-decrypt
+
+ ;; Actions
+ (kbd "C-]") 'gnus-article-refer-article
+ "s" 'gnus-article-show-summary
+ "gr" 'gnus-summary-show-article
+ "gX" 'gnus-summary-browse-url)
+
+ (evil-collection-define-key 'normal 'gnus-group-mode-map
+ ;; quit
+ "Q" 'gnus-group-quit
+ "ZQ" 'gnus-group-quit
+ "q" 'gnus-group-exit
+ "ZZ" 'gnus-group-exit
+
+ ;; Movement
+ "[[" 'gnus-group-prev-unread-group
+ "]]" 'gnus-group-next-unread-group
+ "gk" 'gnus-group-prev-unread-group
+ "gj" 'gnus-group-next-unread-group
+ (kbd "C-j") 'gnus-group-next-group
+ (kbd "C-k") 'gnus-group-prev-group
+
+ ;; Composing, like mu4e
+ "C" 'gnus-group-mail
+ "cc" 'gnus-group-mail
+ "ci" 'gnus-group-news
+
+ ;; Actions
+ "." 'gnus-group-first-unread-group
+ "," 'gnus-group-best-unread-group
+ "A" 'gnus-activate-all-groups
+ "B" 'gnus-group-browse-foreign-server
+ "E" 'gnus-group-edit-group
+ "F" 'gnus-group-find-new-groups
+ "J" 'gnus-group-jump-to-group
+ "R" 'gnus-group-rename-group
+ "X" 'gnus-group-expunge-group
+ (kbd "RET") 'gnus-group-select-group
+ (kbd "SPC") 'gnus-group-read-group
+ "gr" 'gnus-group-get-new-news-this-group
+ "gR" 'gnus-group-get-new-news
+ "gu" 'gnus-group-unsubscribe-current-group
+ "gU" 'gnus-group-unsubscribe-group
+ "gc" 'gnus-group-catchup-current
+ "gC" 'gnus-group-catchup-current-all
+ "ge" 'gnus-group-expire-articles
+ "gE" 'gnus-group-expire-all-groups
+ "gl" 'gnus-group-set-current-level
+
+ ;; Deleting & Pasting
+ "dd" 'gnus-group-kill-group
+ "D" 'gnus-group-kill-group
+ "p" 'gnus-group-yank-group
+ "P" 'gnus-group-yank-group
+
+ ;; Marking
+ "m" 'gnus-group-mark-group
+ "u" 'gnus-group-unmark-group
+ "U" 'gnus-group-unmark-all-groups
+ "M" 'gnus-group-mark-buffer
+ "*" 'gnus-group-mark-buffer
+ "%" 'gnus-group-mark-regexp
+
+ ;; Searching
+ "s" 'gnus-group-apropos
+ "S" 'gnus-group-description-apropos
+ (kbd "M-s") 'gnus-group-read-ephemeral-search-group
+
+ ;; Sorting
+ "oa" 'gnus-group-sort-groups-by-alphabet
+ "ol" 'gnus-group-sort-groups-by-level
+ "om" 'gnus-group-sort-groups-by-method
+ "on" 'gnus-group-sort-groups-by-real-name
+ "or" 'gnus-group-sort-groups-by-rank
+ "os" 'gnus-group-sort-groups
+ "ou" 'gnus-group-sort-groups-by-unread
+ "ov" 'gnus-group-sort-groups-by-score
+
+ ;; Listing
+ "L!" 'gnus-group-list-ticked
+ "L/" 'gnus-group-list-limit-map
+ "L?" 'gnus-group-list-dormant
+ "La" 'gnus-group-list-active ;; was A A
+ "Lc" 'gnus-group-list-cached
+ "Lf" 'gnus-group-list-flush-map
+ "Lk" 'gnus-group-list-killed
+ "Ll" 'gnus-group-list-level
+ "Lm" 'gnus-group-list-matching
+ "LM" 'gnus-group-list-all-matching
+ "Lp" 'gnus-group-list-plus-map
+ "Ls" 'gnus-group-list-groups
+ "Lu" 'gnus-group-list-all-groups
+ "Lz" 'gnus-group-list-zombies
+
+ ;; Topic commands
+ ;; `gnus-topic-move-group' can be done through dd then p
+ "Tn" 'gnus-topic-create-topic
+ "Tj" 'gnus-topic-jump-to-topic
+ "Tr" 'gnus-topic-rename
+ "Td" 'gnus-topic-delete
+ "zc" 'gnus-topic-hide-topic
+ "zo" 'gnus-topic-show-topic
+
+ ;; Topic sorting
+ "Toa" 'gnus-topic-sort-groups-by-alphabet
+ "Tou" 'gnus-topic-sort-groups-by-unread
+ "Tol" 'gnus-topic-sort-groups-by-level
+ "Tov" 'gnus-topic-sort-groups-by-score
+ "Tor" 'gnus-topic-sort-groups-by-rank
+ "Tom" 'gnus-topic-sort-groups-by-method
+ "Toe" 'gnus-group-sort-groups-by-server
+ "Tos" 'gnus-group-sort-groups
+
+ "^" 'gnus-group-enter-server-mode
+
+ (kbd "DEL") 'gnus-group-prev-unread-group
+ [mouse-2] 'gnus-mouse-pick-group
+ "g?" 'gnus-group-help-map)
+
+ (evil-collection-define-key 'normal 'gnus-server-mode-map
+ ;; quit
+ "Q" 'gnus-server-exit
+ "ZQ" 'gnus-server-exit
+ "q" 'gnus-server-exit
+ "ZZ" 'gnus-server-exit
+
+ (kbd "RET") 'gnus-server-read-server
+ (kbd "SPC") 'gnus-server-read-server-in-server-buffer
+ "C" 'gnus-server-close-server
+ "D" 'gnus-server-deny-server
+ "G" 'gnus-group-make-nnir-group
+ "I" 'gnus-server-set-cloud-method-server
+ "L" 'gnus-server-offline-server
+ "O" 'gnus-server-open-server
+ "R" 'gnus-server-remove-denials
+ "S" 'gnus-server-show-server
+ "a" 'gnus-server-add-server
+ "y" 'gnus-server-copy-server
+ "e" 'gnus-server-edit-server
+ "gr" 'gnus-server-regenerate-server
+ "i" 'gnus-server-toggle-cloud-server
+ "d" 'gnus-server-kill-server
+ "L" 'gnus-server-list-servers
+ "s" 'gnus-server-scan-server
+ "p" 'gnus-server-yank-server
+ "c" 'gnus-server-compact-server
+ "M-c" 'gnus-server-close-all-servers
+ "M-o" 'gnus-server-open-all-servers)
+
+ (evil-collection-define-key 'normal 'gnus-browse-mode-map
+ ;; quit
+ "Q" 'gnus-browse-exit
+ "ZQ" 'gnus-browse-exit
+ "q" 'gnus-browse-exit
+ "ZZ" 'gnus-browse-exit
+
+ "u" 'gnus-browse-unsubscribe-current-group
+ (kbd "SPC") 'gnus-browse-read-group
+ (kbd "RET") 'gnus-browse-select-group)
+
+ (evil-collection-define-key 'normal 'gnus-bookmark-bmenu-mode-map
+ ;; quit
+ "Q" 'quit-window
+ "ZQ" 'quit-window
+ "q" 'quit-window
+ "ZZ" 'quit-window
+
+ ;; mark and execution
+ "m" 'gnus-bookmark-bmenu-mark
+ "u" 'gnus-bookmark-bmenu-unmark
+ (kbd "DEL") 'gnus-bookmark-bmenu-backup-unmark
+ "d" 'gnus-bookmark-bmenu-delete
+ "x" 'gnus-bookmark-bmenu-execute-deletions
+
+ (kbd "RET") 'gnus-bookmark-bmenu-select
+ [mouse-2] 'gnus-bookmark-bmenu-select-by-mouse
+ "L" 'gnus-bookmark-bmenu-load
+ "s" 'gnus-bookmark-bmenu-save
+ "t" 'gnus-bookmark-bmenu-toggle-infos
+ "a" 'gnus-bookmark-bmenu-show-details
+ ;; not implemented yet
+ "A" 'gnus-bookmark-bmenu-show-all-annotations
+ "E" 'gnus-bookmark-bmenu-edit-annotation
+ "R" 'gnus-bookmark-bmenu-rename))
+
+(provide 'evil-collection-gnus)
+;;; evil-collection-gnus.el ends here