From: Richard M. Stallman <rms@gnu.org>
Date: Fri, 1 May 1998 03:14:40 +0000 (+0000)
Subject: (rmail-cease-edit): Call rmail-show-message even if message text is unchanged.
X-Git-Tag: emacs-20.3~1200
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=cd95034f46fecd72ff29dd5fcb73453e64ac765a;p=emacs.git

(rmail-cease-edit): Call rmail-show-message even if message text is unchanged.
---

diff --git a/lisp/mail/rmailedit.el b/lisp/mail/rmailedit.el
index b83411ce5ae..8f5a65a9b59 100644
--- a/lisp/mail/rmailedit.el
+++ b/lisp/mail/rmailedit.el
@@ -106,14 +106,15 @@ to return to regular RMAIL:
 	    (aset rmail-summary-vector (1- rmail-current-message) nil)
 	    (save-excursion
 	      (rmail-widen-to-current-msgbeg
-	        (function (lambda ()
+		(function (lambda ()
 			    (forward-line 2)
 			    (if (looking-at "Summary-line: ")
 				(let ((buffer-read-only nil))
 				  (delete-region (point)
 						 (progn (forward-line 1)
-							(point))))))))
-	      (rmail-show-message))))))
+							(point))))))))))))
+    (save-excursion
+      (rmail-show-message)))
   (setq buffer-read-only t))
 
 (defun rmail-abort-edit ()