From 2bda02943b555b184f09dd1a5882e04a288f5026 Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Sun, 5 Dec 2021 19:11:59 -0800 Subject: [PATCH] Use time-convert in with-decoded-time-value * lisp/calendar/time-date.el (with-decoded-time-value): Prefer time-convert to current-time on the off chance that code will use this obsolete macro even after current-time returns pairs. --- lisp/calendar/time-date.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/calendar/time-date.el b/lisp/calendar/time-date.el index 37a16d3b98c..b36171259c0 100644 --- a/lisp/calendar/time-date.el +++ b/lisp/calendar/time-date.el @@ -69,7 +69,7 @@ list (HIGH LOW MICRO PICO)." (pop elt))) (time-value (car elt)) (gensym (make-symbol "time"))) - `(let* ,(append `((,gensym (or ,time-value (current-time))) + `(let* ,(append `((,gensym (or ,time-value (time-convert nil 'list))) (,gensym (cond ((integerp ,gensym) -- 2.39.5