force use of strings for other-header in mu4e~compose-mail

org-mime and potentially other users of `compose-mail' pass a parameter
`other-headers', an alist of the form ((symbol . string)).
`mu4e~compose-mail' sends this parameter to message-add-header, which
appears to expect a string instead.  We therefore loop through
other-headers and instead pass a string to message-add-header for each
element of other-headers.
This commit is contained in:
Matt Price
2016-11-30 14:48:52 -05:00
parent b8711d22c8
commit ad738b88b0

View File

@ -762,7 +762,10 @@ draft message."
;; add any other headers specified
(when other-headers
(message-add-header other-headers))
(dolist (h other-headers other-headers)
(if (symbolp (car h)) (setcar h (symbol-name (car h))))
(message-add-header (concat (capitalize (car h)) ": " (cdr h) "\n" ))
))
;; yank message
(if (bufferp yank-action)