Commit cd95034f authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

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

parent f11f6cce
......@@ -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 ()
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment