mirror of https://github.com/djcb/mu.git
mu4e-compose: Generate message-id for drafts
Ensure even drafts have a message-id, since the querying machinery wants that.
This commit is contained in:
parent
548dc16f67
commit
798aa12a34
|
@ -298,9 +298,13 @@ If needed, set the Fcc header, and register the handler function."
|
||||||
(defun mu4e~compose-register-message-save-hooks ()
|
(defun mu4e~compose-register-message-save-hooks ()
|
||||||
"Just before saving, we remove the `mail-header-separator'.
|
"Just before saving, we remove the `mail-header-separator'.
|
||||||
Just after saving we restore it; thus, the separator should never
|
Just after saving we restore it; thus, the separator should never
|
||||||
appear on disk."
|
appear on disk. Also update the Date and ensure we have a
|
||||||
|
Message-ID."
|
||||||
(add-hook 'before-save-hook
|
(add-hook 'before-save-hook
|
||||||
(lambda()
|
(lambda()
|
||||||
|
;; replace the date
|
||||||
|
(message-remove-header "Date")
|
||||||
|
(message-generate-headers '(Date Message-ID))
|
||||||
(save-match-data
|
(save-match-data
|
||||||
(mu4e~draft-remove-mail-header-separator))) nil t)
|
(mu4e~draft-remove-mail-header-separator))) nil t)
|
||||||
(add-hook 'after-save-hook
|
(add-hook 'after-save-hook
|
||||||
|
|
Loading…
Reference in New Issue