awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-03 12:27:26 -05:00
Code Issues Packages Projects Releases Wiki Activity

mu4e: also prettify key-val string in main view

Browse Source
This commit is contained in:
TEC
2021-06-19 03:22:53 +08:00
parent 3778862a79
commit 8603a3c7d2
2 changed files with 6 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
modules/email/mu4e/autoload/advice.el
View File

@ -27,6 +27,11 @@ clicked."
(- (length newstr) 1) 'mouse-face 'highlight newstr) (- (length newstr) 1) 'mouse-face 'highlight newstr)
newstr)) newstr))
;;;###autoload
(defun +mu4e~main-keyval-str-prettier-a (str)
"Replace '*' with '⚫' in STR."
(replace-regexp-in-string "\t\\*" "\t⚫" str))
;; Org msg LaTeX image scaling ;; Org msg LaTeX image scaling
;;;###autoload ;;;###autoload

1
modules/email/mu4e/config.el
View File

@ -203,6 +203,7 @@
(add-hook 'mu4e-compose-pre-hook '+mu4e-set-from-address-h) (add-hook 'mu4e-compose-pre-hook '+mu4e-set-from-address-h)
(advice-add #'mu4e~key-val :filter-return #'+mu4e~main-keyval-str-prettier-a)
(advice-add #'mu4e~main-action-str :override #'+mu4e~main-action-str-prettier-a) (advice-add #'mu4e~main-action-str :override #'+mu4e~main-action-str-prettier-a)
(when (featurep! :editor evil) (when (featurep! :editor evil)
;; As +mu4e~main-action-str-prettier replaces [k]ey with key q]uit should become quit ;; As +mu4e~main-action-str-prettier replaces [k]ey with key q]uit should become quit