1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-06 11:50:51 -08:00

(display-time-event-handler): Use let*.

This commit is contained in:
Richard M. Stallman 1996-12-18 02:46:34 +00:00
parent e654f4b02c
commit 85673d2b49

View file

@ -135,7 +135,7 @@ would give mode line times like `94/12/30 21:07:48 (UTC)'.")
(display-time-update)
;; Do redisplay right now, if no input pending.
(sit-for 0)
(let ((current (current-time))
(let* ((current (current-time))
(timer display-time-timer)
;; Compute the time when this timer will run again, next.
(next-time (timer-relative-time