From a94832429a3a2b24fddb1d08a345bdf6758cd3b7 Mon Sep 17 00:00:00 2001 From: TEC Date: Sun, 4 Oct 2020 01:03:26 +0800 Subject: [PATCH] Mu4e: tweak flag bookmark, keymap, mu4e:main end --- modules/email/mu4e/config.el | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/modules/email/mu4e/config.el b/modules/email/mu4e/config.el index 58e6463ce..ba91de452 100644 --- a/modules/email/mu4e/config.el +++ b/modules/email/mu4e/config.el @@ -80,7 +80,7 @@ (plist-put (cdr (assoc :flags mu4e-header-info)) :shortname " Flags") ; default=Flgs (add-to-list 'mu4e-bookmarks - '(:name "Flagged messages" :query "flag:flagged" :key ?f)) + '(:name "Flagged messages" :query "flag:flagged" :key ?f) t) (defun mu4e-header-colourise (str) (let* ((str-sum (apply #'+ (mapcar (lambda (c) (% c 3)) str))) @@ -151,6 +151,9 @@ (when (fboundp 'imagemagick-register-types) (imagemagick-register-types)) + (map! :map mu4e-main-mode-map + :ne "h" #'+workspace/other) + (map! :map mu4e-headers-mode-map :e "l" #'mu4e-msg-to-agenda) @@ -174,7 +177,10 @@ (add-hook 'mu4e-compose-pre-hook '+mu4e-set-account) - (advice-add #'mu4e~main-action-str :override #'mu4e~main-action-prettier-str)) + (advice-add #'mu4e~main-action-str :override #'mu4e~main-action-prettier-str) + (when (featurep! :editor evil) + ;; As mu4e~main-action-prettier-str replaces [k]ey with key q]uit should become quit + (setq evil-collection-mu4e-end-region-misc "quit"))) (use-package! org-msg :after mu4e