Mercurial > emacs
comparison lisp/mail/rmailsum.el @ 5861:882894a8c217
(rmail-summary-expunge-and-save): Mark summary buffer as unmodified.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Wed, 09 Feb 1994 04:26:28 +0000 |
parents | 85119c3098a0 |
children | 401da3d11995 |
comparison
equal
deleted
inserted
replaced
5860:ba1ff614b8f2 | 5861:882894a8c217 |
---|---|
815 (set-buffer rmail-buffer) | 815 (set-buffer rmail-buffer) |
816 (rmail-only-expunge)) | 816 (rmail-only-expunge)) |
817 (rmail-update-summary) | 817 (rmail-update-summary) |
818 (save-excursion | 818 (save-excursion |
819 (set-buffer rmail-buffer) | 819 (set-buffer rmail-buffer) |
820 (save-buffer))) | 820 (save-buffer)) |
821 (set-buffer-modified-p nil)) | |
821 | 822 |
822 (defun rmail-summary-get-new-mail () | 823 (defun rmail-summary-get-new-mail () |
823 "Get new mail and recompute summary headers." | 824 "Get new mail and recompute summary headers." |
824 (interactive) | 825 (interactive) |
825 (let (msg) | 826 (let (msg) |