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:
parent
9b49afd287
commit
3001c6eaa8
1 changed files with 2 additions and 2 deletions
|
|
@ -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
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue