diff options
| author | Richard M. Stallman | 1996-02-27 22:45:40 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1996-02-27 22:45:40 +0000 |
| commit | d3c7da2179f6a2f3292b6c322915f7ff64231dfe (patch) | |
| tree | c56af9c6c128711ac5d4af23f7973a974bfe5ebf | |
| parent | 4f5c586ac0be536917a6efb6f63cf3e68ccd57ab (diff) | |
| download | emacs-d3c7da2179f6a2f3292b6c322915f7ff64231dfe.tar.gz emacs-d3c7da2179f6a2f3292b6c322915f7ff64231dfe.zip | |
(display-time): Use rmail-after-get-new-mail-hook.
| -rw-r--r-- | lisp/time.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/time.el b/lisp/time.el index b6cc833ca4e..f3453c0bff1 100644 --- a/lisp/time.el +++ b/lisp/time.el | |||
| @@ -73,7 +73,7 @@ After each update, `display-time-hook' is run with `run-hooks'." | |||
| 73 | (setq display-time-timer | 73 | (setq display-time-timer |
| 74 | (run-at-time nil display-time-interval 'display-time-event-handler)) | 74 | (run-at-time nil display-time-interval 'display-time-event-handler)) |
| 75 | ;; When you get new mail, clear "Mail" from the mode line. | 75 | ;; When you get new mail, clear "Mail" from the mode line. |
| 76 | (add-hook 'rmail-get-new-mail-hook 'display-time-event-handler)) | 76 | (add-hook 'rmail-after-get-new-mail-hook 'display-time-event-handler)) |
| 77 | 77 | ||
| 78 | (defvar display-time-string-forms | 78 | (defvar display-time-string-forms |
| 79 | '((if display-time-day-and-date | 79 | '((if display-time-day-and-date |