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

fix(mu4e): +mu4e/capture-msg-to-agenda with mu 1.8

Browse source
This commit is contained in:
TEC 2022-09-23 00:46:25 +08:00 • committed by Henrik Lissner
parent f2d62acaad
commit 3a19152787
1 changed files with 5 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

8
modules/email/mu4e/autoload/email.el
View file

@ -214,8 +214,10 @@ is tomorrow. With two prefixes, select the deadline."
(lev (org-outline-level))
(folded-p (invisible-p (point-at-eol)))
(from (plist-get msg :from)))
(if (consp (car from)) ; Occurs when using mu4e 1.8+.
(setq from (car from)))
(when (consp (car from)) ; Occurs when using mu4e 1.8+.
(setq from (car from)))
(unless (keywordp (car from)) ; If using mu4e <= 1.6.
(setq from (list :name (or (caar from) (cdar from)))))
;; place the subheader
(when folded-p (show-branches)) ; unfold if necessary
(org-end-of-meta-data) ; skip property drawer
@ -227,7 +229,7 @@ is tomorrow. With two prefixes, select the deadline."
"[[mu4e:msgid:"
(plist-get msg :message-id) "]["
(truncate-string-to-width
(or (caar from) (cdar from)) 25 nil nil t)
(plist-get from :name) 25 nil nil t)
" - "
(truncate-string-to-width
(plist-get msg :subject) 40 nil nil t)