mu4e: use message-field-value

Simplify

...instead of
save-restriction/message-narrow-to-headers/message-fetch-field.
This commit is contained in:
Dirk-Jan C. Binnema
2024-04-16 19:03:08 +03:00
parent a2f08a77f5
commit 4f72e2656d
3 changed files with 65 additions and 78 deletions

View File

@ -685,7 +685,7 @@ determine which browser function to use."
(ignore-errors (run-hooks 'gnus-article-decode-hook))
(let ((header (unless skip-headers
(cl-loop for field in '("from" "to" "cc" "date" "subject")
when (message-fetch-field field)
when (message-field-value field)
concat (format "%s: %s\n" (capitalize field) it))))
(parts (mm-dissect-buffer t t)))
;; If singlepart, enforce a list.