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)