From 3001c6eaa878db9e384bfcb499fe483a0dad7430 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Thu, 1 Aug 2019 13:47:04 +0200 Subject: [PATCH] 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'. --- lisp/gnus/gnus-demon.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/gnus/gnus-demon.el b/lisp/gnus/gnus-demon.el index b26aaa15297..6007e18f558 100644 --- a/lisp/gnus/gnus-demon.el +++ b/lisp/gnus/gnus-demon.el @@ -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 -- 2.39.2