summaryrefslogtreecommitdiff
path: root/lisp/net/newst-backend.el
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2019-07-31 15:18:03 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2019-07-31 21:47:29 +0200
commit1ab6445bb3ed7e0ebe771692cbeda557a82b9381 (patch)
tree50bdb3881a91ab17e3d577824eb76508beb55fab /lisp/net/newst-backend.el
parent296002ba5aefa60f8a1f97c4d28808683247ce8b (diff)
downloademacs-1ab6445bb3ed7e0ebe771692cbeda557a82b9381.tar.gz
Fix time zone in previous rewrite of newsticker--decode-iso8601-date
* lisp/net/newst-backend.el (newsticker--decode-iso8601-date): According to the tests, this function should default to the Z time zone.
Diffstat (limited to 'lisp/net/newst-backend.el')
-rw-r--r--lisp/net/newst-backend.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/net/newst-backend.el b/lisp/net/newst-backend.el
index 5064610e39c..1fb7fe005ea 100644
--- a/lisp/net/newst-backend.el
+++ b/lisp/net/newst-backend.el
@@ -1597,10 +1597,11 @@ This function calls `message' with arguments STRING and ARGS, if
(defun newsticker--decode-iso8601-date (string)
"Return ISO8601-STRING in format like `encode-time'.
-Converts from ISO-8601 to Emacs representation."
+Converts from ISO-8601 to Emacs representation. If no time zone
+is present, this fuction defaults to universal time."
(if string
(condition-case nil
- (encode-time (iso8601-parse string))
+ (encode-time (decoded-time-set-defaults (iso8601-parse string) 0))
(wrong-type-argument
(message "Cannot decode \"%s\"" string)
nil))