From ec3adf80c674047c0e9a276e740144530325a161 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 27 Feb 1996 22:41:49 +0000 Subject: [PATCH] (rmail-get-new-mail): Run rmail-after-get-new-mail-hook. --- lisp/mail/rmail.el | 1 + 1 file changed, 1 insertion(+) diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index ffb016917ea5..a8efb765c133 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el @@ -943,6 +943,7 @@ It returns t if it got any new messages." ;; Move to the first new message ;; unless we have other unseen messages before it. (rmail-show-message (rmail-first-unseen-message)) + (run-hooks 'rmail-after-get-new-mail-hook) t)) ;; Don't leave the buffer screwed up if we get a disk-full error. (rmail-show-message)))