Mercurial > emacs
changeset 88184:c727bbb95be3
(rmail-cease-edit): Do not adjust the marker of the
last message.
| author | Alex Schroeder <alex@gnu.org> |
|---|---|
| date | Tue, 17 Jan 2006 09:34:11 +0000 |
| parents | 4016b676ab1e |
| children | b6b65e7ea49f |
| files | lisp/mail/rmailedit.el |
| diffstat | 1 files changed, 4 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mail/rmailedit.el Tue Jan 17 09:33:35 2006 +0000 +++ b/lisp/mail/rmailedit.el Tue Jan 17 09:34:11 2006 +0000 @@ -119,8 +119,10 @@ (goto-char (point-max)) (if (/= (preceding-char) ?\n) (insert "\n")) - ;; Adjust the marker that points to the end of this message. - (rmail-desc-set-start (1+ rmail-current-message) (point))) + ;; Adjust the marker that points to the end of this message, unles + ;; we're at the last message. + (when (< rmail-current-message (length rmail-desc-vector)) + (rmail-desc-set-end (1+ rmail-current-message) (point)))) (let ((old rmail-old-text)) (force-mode-line-update) (kill-all-local-variables)