mirror of https://github.com/djcb/mu.git
mu4e: treat 'traditional as 'above
This commit is contained in:
parent
02e651a8fc
commit
475fec0d16
|
@ -107,8 +107,8 @@ which takes no arguments, and which should return on of the mentioned symbols,
|
||||||
for example:
|
for example:
|
||||||
|
|
||||||
(setq mu4e-sent-messages-behavior (lambda ()
|
(setq mu4e-sent-messages-behavior (lambda ()
|
||||||
(if (string= (message-sendmail-envelope-from) \"foo@example.com\")
|
(if (string= (message-sendmail-envelope-from) \"foo@example.com\")
|
||||||
'delete 'sent)))
|
'delete 'sent)))
|
||||||
|
|
||||||
The various `message-' functions from `message-mode' are available
|
The various `message-' functions from `message-mode' are available
|
||||||
for querying the message information."
|
for querying the message information."
|
||||||
|
@ -581,12 +581,12 @@ tempfile)."
|
||||||
(message-goto-to)
|
(message-goto-to)
|
||||||
;; otherwise, it depends...
|
;; otherwise, it depends...
|
||||||
(case message-cite-reply-position
|
(case message-cite-reply-position
|
||||||
(above
|
((above traditional)
|
||||||
(message-goto-body))
|
(message-goto-body))
|
||||||
(t
|
(t
|
||||||
(when (message-goto-signature)
|
(when (message-goto-signature)
|
||||||
(forward-line -2)))))
|
(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)
|
||||||
|
|
Loading…
Reference in New Issue