mu4e-comnpose: avoid jumping to headers when saving

Wrap the before-save-hook function in a save-excursion.

(HT: Joost Kremers)
This commit is contained in:
Dirk-Jan C. Binnema 2019-10-23 20:21:24 +03:00
parent 798aa12a34
commit d7a5349a74
1 changed files with 5 additions and 4 deletions

View File

@ -303,10 +303,11 @@ Message-ID."
(add-hook 'before-save-hook
(lambda()
;; replace the date
(message-remove-header "Date")
(message-generate-headers '(Date Message-ID))
(save-match-data
(mu4e~draft-remove-mail-header-separator))) nil t)
(save-excursion
(message-remove-header "Date")
(message-generate-headers '(Date Message-ID))
(save-match-data
(mu4e~draft-remove-mail-header-separator)))) nil t)
(add-hook 'after-save-hook
(lambda ()
(save-match-data