summaryrefslogtreecommitdiff
path: root/lisp/midnight.el
diff options
context:
space:
mode:
authorPaul Eggert <eggert@cs.ucla.edu>2021-12-05 23:00:10 -0800
committerPaul Eggert <eggert@cs.ucla.edu>2021-12-05 23:24:10 -0800
commita21b8c5d7dfb3808cf18a5ac118e25940c9b5518 (patch)
tree0775bfc0120f9ddd9ba21b80ee06ba8371ff1659 /lisp/midnight.el
parent19932c32039b8e61486195504a72bfc037b29658 (diff)
downloademacs-a21b8c5d7dfb3808cf18a5ac118e25940c9b5518.tar.gz
emacs-a21b8c5d7dfb3808cf18a5ac118e25940c9b5518.tar.bz2
emacs-a21b8c5d7dfb3808cf18a5ac118e25940c9b5518.zip
Fix minor clock skew issues
* lisp/midnight.el (clean-buffer-list): * lisp/progmodes/vhdl-mode.el (vhdl-template-replace-header-keywords): * lisp/net/rcirc.el (rcirc-connect): Don’t assume that getting the current time twice in rapid succession will yield the same date and time.
Diffstat (limited to 'lisp/midnight.el')
-rw-r--r--lisp/midnight.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/midnight.el b/lisp/midnight.el
index b3adbf00172..51173e7429f 100644
--- a/lisp/midnight.el
+++ b/lisp/midnight.el
@@ -159,7 +159,7 @@ the current date/time, buffer name, how many seconds ago it was
displayed (can be nil if the buffer was never displayed) and its
lifetime, i.e., its \"age\" when it will be purged."
(interactive)
- (let ((tm (current-time)) bts (ts (format-time-string "%Y-%m-%d %T"))
+ (let* ((tm (current-time)) bts (ts (format-time-string "%Y-%m-%d %T" tm))
delay cbld bn)
(dolist (buf (buffer-list))
(when (buffer-live-p buf)