Mercurial > emacs
changeset 16084:c477472563dd
(display-time): Use new run-at-time functionality to
fix display glitches when display-time-interval != 60.
| author | Paul Eggert <eggert@twinsun.com> |
|---|---|
| date | Tue, 03 Sep 1996 18:16:06 +0000 |
| parents | bd86abce47f4 |
| children | b215fb935fc3 |
| files | lisp/time.el |
| diffstat | 1 files changed, 2 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/time.el Tue Sep 03 18:08:27 1996 +0000 +++ b/lisp/time.el Tue Sep 03 18:16:06 1996 +0000 @@ -89,9 +89,8 @@ (append global-mode-string '(display-time-string)))) ;; Set up the time timer. (setq display-time-timer - ;; Start timer at the beginning of the next minute. - (run-at-time (apply 'encode-time 60 (cdr (decode-time))) - display-time-interval 'display-time-event-handler)) + (run-at-time t display-time-interval + 'display-time-event-handler)) ;; Make the time appear right away. (display-time-update) ;; When you get new mail, clear "Mail" from the mode line.