From 73c6370a5a4dd50a87a80b69c1ad5b3851394dbe Mon Sep 17 00:00:00 2001 From: Milan Glacier Date: Sun, 16 Apr 2023 14:10:40 -0400 Subject: [PATCH] mu4e: clean up code. --- modes/mu4e/evil-collection-mu4e.el | 11 +++++------ 1 file changed, 5 insertions(+), 6 deletions(-) diff --git a/modes/mu4e/evil-collection-mu4e.el b/modes/mu4e/evil-collection-mu4e.el index d71064c..6a06376 100644 --- a/modes/mu4e/evil-collection-mu4e.el +++ b/modes/mu4e/evil-collection-mu4e.el @@ -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.")