emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 2bda029 07/13: Use time-convert in with-decoded-time-value


From: Paul Eggert
Subject: master 2bda029 07/13: Use time-convert in with-decoded-time-value
Date: Mon, 6 Dec 2021 02:24:22 -0500 (EST)

branch: master
commit 2bda02943b555b184f09dd1a5882e04a288f5026
Author: Paul Eggert <eggert@cs.ucla.edu>
Commit: Paul Eggert <eggert@cs.ucla.edu>

    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 37a16d3..b361712 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)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]