emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Mu4e: Tidy and tweak default settings

Browse source
This commit is contained in:
TEC 2020-10-01 18:23:28 +08:00
parent 522c2e0dda
commit 940177613e
No known key found for this signature in database
GPG key ID: 779591AFDB81F06C
1 changed files with 11 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

23
modules/email/mu4e/config.el
View file

@ -51,16 +51,22 @@
(t #'ido-completing-read)) (t #'ido-completing-read))
;; no need to ask ;; no need to ask
mu4e-confirm-quit nil mu4e-confirm-quit nil
mu4e-headers-thread-single-orphan-prefix '("─>" . "─▶")
mu4e-headers-thread-orphan-prefix '("┬>" . "┬▶ ")
mu4e-headers-thread-last-child-prefix '("└>" . "╰▶")
mu4e-headers-thread-child-prefix '("├>" . "├▶")
mu4e-headers-thread-connection-prefix '("│" . "│ ")
;; remove 'lists' column ;; remove 'lists' column
mu4e-headers-fields mu4e-headers-fields
'((:account . 12) '((:account . 12)
(:human-date . 12) (:human-date . 8)
(:flags . 4) (:flags . 6) ; 3 icon flags
(:from . 25) (:from . 25)
(:subject))) (:subject)))
;; set mail user agent ;; set mail user agent
(setq mail-user-agent 'mu4e-user-agent) (setq mail-user-agent 'mu4e-user-agent
message-mail-user-agent 'mu4e-user-agent)
;; Set the icons only when a graphical frame has been created ;; Set the icons only when a graphical frame has been created
(if (display-graphic-p) (if (display-graphic-p)
@ -72,16 +78,9 @@
(mu4e~initialise-icons) (mu4e~initialise-icons)
(remove-hook #'mu4e~initialise-icons-hook))))) (remove-hook #'mu4e~initialise-icons-hook)))))
;; Header view
(setq mu4e-headers-fields
'((:account . 12)
(:human-date . 8)
(:flags . 6) ; 3 icon flags
(:from . 25)
(:subject)))
(plist-put (cdr (assoc :flags mu4e-header-info)) :shortname " Flags") ; default=Flgs (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))
(defvar mu4e~header-colourised-faces (defvar mu4e~header-colourised-faces
'(all-the-icons-lblue '(all-the-icons-lblue