(rmail-summary-expunge-and-save): Mark summary buffer as unmodified.

1994-02-09 04:26:28 +00:00
parent c70658194a
commit ccc341de40
1 changed files with 2 additions and 1 deletions
--- a/lisp/mail/rmailsum.el
+++ b/lisp/mail/rmailsum.el
@@ -817,7 +817,8 @@ Commands for sorting the summary:
  (rmail-update-summary)
  (save-excursion
    (set-buffer rmail-buffer)
-    (save-buffer)))
+    (save-buffer))
+  (set-buffer-modified-p nil))

 (defun rmail-summary-get-new-mail ()
  "Get new mail and recompute summary headers."