1
0
mirror of https://github.com/djcb/mu.git synced 2024-07-27 12:17:53 +02:00

mu4e-draft: fix mu4e-compose-pre-hook

Run the hook earlier, and ensure mu4e-compose-type &
mu4e-compose-parent-message are set.

As noted in #2715.
This commit is contained in:
Dirk-Jan C. Binnema 2024-06-17 22:00:03 +03:00
parent e6fd83d00d
commit 67ea98e36e

View File

@ -560,8 +560,7 @@ This is mu4e's version of `message-hidden-headers'.")
"Get ready for message composition.
PARENT is the parent message, if any."
(unless (mu4e-running-p) (mu4e 'background)) ;; start if needed
(mu4e--context-autoswitch parent mu4e-compose-context-policy)
(run-hooks 'mu4e-compose-pre-hook))
(mu4e--context-autoswitch parent mu4e-compose-context-policy))
(defun mu4e--prepare-draft-headers (compose-type)
"Add extra headers for message based on COMPOSE-TYPE."
@ -709,6 +708,11 @@ it must be nil.
After this, user is presented with a message composition buffer.
Returns the new buffer."
;; run pre-hook early, so user can influence later steps.
(let ((mu4e-compose-parent-message parent)
(mu4e-compose-type compose-type))
(run-hooks 'mu4e-compose-pre-hook))
(mu4e--prepare-draft parent)
;; evaluate BODY; this must yield a hidden, live buffer. This is evaluated in
;; a temp buffer with contains the parent-message, if any. if there's a