emacs: push mark before signature on reply

We push mark on reply so user can cut the quote. Push the mark before
signature, if any, instead of end of buffer so the signature is
preserved.

This is consistent with message-kill-to-signature.
This commit is contained in:
Jani Nikula 2014-03-28 20:04:25 +02:00 committed by David Bremner
parent 31fc76b782
commit d0c4cd7e58

View file

@ -226,8 +226,12 @@ list."
;; Quote the original message according to the user's configured style. ;; Quote the original message according to the user's configured style.
(message-cite-original)))) (message-cite-original))))
(goto-char (point-max)) ;; Push mark right before signature, if any.
(message-goto-signature)
(unless (eobp)
(end-of-line -1))
(push-mark) (push-mark)
(message-goto-body) (message-goto-body)
(set-buffer-modified-p nil)) (set-buffer-modified-p nil))