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.
This commit is contained in:
parent
084f440571
commit
2bda02943b
1 changed files with 1 additions and 1 deletions
|
@ -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)
|
||||
|
|
Loading…
Add table
Reference in a new issue