# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 825461140 0
# Node ID 49f7a84c983747412f04e1c068655840439dcdc6
# Parent  e7f7883b92776e3a3090f972ac3b09eebfebf7ba
(display-time): Use rmail-after-get-new-mail-hook.

diff -r e7f7883b9277 -r 49f7a84c9837 lisp/time.el
--- a/lisp/time.el	Tue Feb 27 22:41:49 1996 +0000
+++ b/lisp/time.el	Tue Feb 27 22:45:40 1996 +0000
@@ -73,7 +73,7 @@
   (setq display-time-timer
 	(run-at-time nil display-time-interval 'display-time-event-handler))
   ;; When you get new mail, clear "Mail" from the mode line.
-  (add-hook 'rmail-get-new-mail-hook 'display-time-event-handler))
+  (add-hook 'rmail-after-get-new-mail-hook 'display-time-event-handler))
 
 (defvar display-time-string-forms
   '((if display-time-day-and-date