diff options
author | Karl Heuer <[email protected]> | 1994-02-09 04:25:48 +0000 |
---|---|---|
committer | Karl Heuer <[email protected]> | 1994-02-09 04:25:48 +0000 |
commit | c70658194a9fa51199fc6ee58ff17cc01c69b8e9 (patch) | |
tree | 0b376de8775e1294892824090a7a08b38c3cbcbf /lisp | |
parent | e507447418b362f680802ed5a149d17dc513eba3 (diff) |
(rmail-expunge-and-save): Mark summary buffer as unmodified.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/mail/rmail.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index 3641f47067..17b87a83c4 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el @@ -634,7 +634,9 @@ Instead, these commands are available: "Expunge and save RMAIL file." (interactive) (rmail-expunge) - (save-buffer)) + (save-buffer) + (if (rmail-summary-exists) + (rmail-select-summary (set-buffer-modified-p nil)))) (defun rmail-quit () "Quit out of RMAIL." |