X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fgnus-demon.el;h=7c1fa494988aad9e3bc6891493288f1ad88a3607;hb=a7526f1a05980024abc486f7455cf20e58502580;hp=3401ed4e49f98c822f8b41de84440c2bbfa0fc8a;hpb=b008f17a2c9cff5c7c0b0c669d54aba93c561a23;p=elisp%2Fgnus.git- diff --git a/lisp/gnus-demon.el b/lisp/gnus-demon.el index 3401ed4..7c1fa49 100644 --- a/lisp/gnus-demon.el +++ b/lisp/gnus-demon.el @@ -152,8 +152,8 @@ time Emacs has been idle for IDLE `gnus-demon-timestep's." (nowParts (decode-time now)) ;; obtain THEN as discrete components (thenParts (parse-time-string time)) - (thenHour (string-to-int (elt thenParts 0))) - (thenMin (string-to-int (elt thenParts 1))) + (thenHour (elt thenParts 0)) + (thenMin (elt thenParts 1)) ;; convert time as elements into number of seconds since EPOCH. (then (encode-time 0 thenMin