mirror of https://github.com/djcb/mu.git
mu4e-compose: handle message-cite-reply-position later
Can't really repro the problem. Perhaps I don't have hidden heders? Anyway, can't hurt to move it after that. Fixes #2283.
This commit is contained in:
parent
40517e8a1e
commit
99eb3bb674
|
@ -581,14 +581,6 @@ are optional."
|
||||||
|
|
||||||
(mu4e~compose-set-friendly-buffer-name compose-type)
|
(mu4e~compose-set-friendly-buffer-name compose-type)
|
||||||
|
|
||||||
;; now jump to some useful positions, and start writing that mail!
|
|
||||||
(if (member compose-type '(new forward))
|
|
||||||
(message-goto-to)
|
|
||||||
;; otherwise, it depends...
|
|
||||||
(pcase message-cite-reply-position
|
|
||||||
((or 'above 'traditional) (message-goto-body))
|
|
||||||
(_ (when (message-goto-signature) (forward-line -2)))))
|
|
||||||
|
|
||||||
;; bind to `mu4e-compose-parent-message' of compose buffer
|
;; bind to `mu4e-compose-parent-message' of compose buffer
|
||||||
(set (make-local-variable 'mu4e-compose-parent-message) original-msg)
|
(set (make-local-variable 'mu4e-compose-parent-message) original-msg)
|
||||||
(put 'mu4e-compose-parent-message 'permanent-local t)
|
(put 'mu4e-compose-parent-message 'permanent-local t)
|
||||||
|
@ -600,6 +592,15 @@ are optional."
|
||||||
(mu4e~compose-hide-headers)
|
(mu4e~compose-hide-headers)
|
||||||
;; switch on the mode
|
;; switch on the mode
|
||||||
(mu4e-compose-mode)
|
(mu4e-compose-mode)
|
||||||
|
|
||||||
|
;; now jump to some useful positions, and start writing that mail!
|
||||||
|
(if (member compose-type '(new forward))
|
||||||
|
(message-goto-to)
|
||||||
|
;; otherwise, it depends...
|
||||||
|
(pcase message-cite-reply-position
|
||||||
|
((or 'above 'traditional) (message-goto-body))
|
||||||
|
(_ (when (message-goto-signature) (forward-line -2)))))
|
||||||
|
|
||||||
;; don't allow undoing anything before this.
|
;; don't allow undoing anything before this.
|
||||||
(setq buffer-undo-list nil)
|
(setq buffer-undo-list nil)
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue