1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-05-03 03:32:44 -07:00

Use decoded-time accessors in gnus-demon

* lisp/gnus/gnus-demon.el (gnus-demon-time-to-step): Use
decoded-time accessors for results from `parse-time-string'.
This commit is contained in:
Lars Ingebrigtsen 2019-08-01 13:47:04 +02:00
parent 9b49afd287
commit 3001c6eaa8

View file

@ -173,8 +173,8 @@ marked with SPECIAL."
(nowParts (decode-time now))
;; obtain THEN as discrete components
(thenParts (parse-time-string time))
(thenHour (elt thenParts 2))
(thenMin (elt thenParts 1))
(thenHour (decoded-time-hour thenParts))
(thenMin (decoded-time-minute thenParts))
;; convert time as elements into number of seconds since EPOCH.
(then (encode-time
0