emacs
/
evil-collection
mirror of https://github.com/jojojames/evil-collection.git
1
0
Fork 0
Code Issues Releases Wiki Activity

mu4e: clean up code.

This commit is contained in:
Milan Glacier 2023-04-16 14:10:40 -04:00 committed by James
parent 14af794d5b
commit 0a550bbbc2
1 changed files with 5 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
modes/mu4e/evil-collection-mu4e.el
View File

@ -101,6 +101,10 @@
"Set initial state in `mu4e-compose-mode' to \='insert."
(evil-set-initial-state 'mu4e-compose-mode 'insert))
(defun evil-collection-mu4e-mark-thread-as-read ()
(interactive)
(mu4e-headers-mark-thread nil '(read)))
(defvar evil-collection-mu4e-mode-map-bindings
`((mu4e-main-mode-map
"J" mu4e~headers-jump-to-maildir
@ -172,9 +176,7 @@
"zd" mu4e-headers-toggle-skip-duplicates
"gl" mu4e-show-log
"gv" mu4e-select-other-view
"T" (lambda ()
(interactive)
(mu4e-headers-mark-thread nil '(read))))
"T" evil-collection-mu4e-mark-thread-as-read)
(mu4e-compose-mode-map
"gg" mu4e-compose-goto-top
@ -238,9 +240,6 @@
"." mu4e-view-raw-message
,(kbd "C--") mu4e-headers-split-view-shrink
,(kbd "C-+") mu4e-headers-split-view-grow
"T" (lambda ()
(interactive)
(mu4e-headers-mark-thread nil '(read)))
,@(when evil-want-C-u-scroll
'("\C-u" evil-scroll-up))))
"All evil-mu4e bindings.")