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

1 files changed, 4 insertions, 3 deletions

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 ()