# HG changeset patch
# User Alex Schroeder <alex@gnu.org>
# Date 1137490451 0
# Node ID c727bbb95be3949e046609130c249820c150d576
# Parent  4016b676ab1ec4d0e7a7ca401d1a265af437beff
(rmail-cease-edit): Do not adjust the marker of the
last message.

diff -r 4016b676ab1e -r c727bbb95be3 lisp/mail/rmailedit.el
--- 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)