aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorLars Ingebrigtsen2019-07-31 15:18:03 +0200
committerLars Ingebrigtsen2019-07-31 21:47:29 +0200
commit1ab6445bb3ed7e0ebe771692cbeda557a82b9381 (patch)
tree50bdb3881a91ab17e3d577824eb76508beb55fab
parent296002ba5aefa60f8a1f97c4d28808683247ce8b (diff)
downloademacs-1ab6445bb3ed7e0ebe771692cbeda557a82b9381.tar.gz
emacs-1ab6445bb3ed7e0ebe771692cbeda557a82b9381.zip
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.
-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
1597 1597
1598(defun newsticker--decode-iso8601-date (string) 1598(defun newsticker--decode-iso8601-date (string)
1599 "Return ISO8601-STRING in format like `encode-time'. 1599 "Return ISO8601-STRING in format like `encode-time'.
1600Converts from ISO-8601 to Emacs representation." 1600Converts from ISO-8601 to Emacs representation. If no time zone
1601is present, this fuction defaults to universal time."
1601 (if string 1602 (if string
1602 (condition-case nil 1603 (condition-case nil
1603 (encode-time (iso8601-parse string)) 1604 (encode-time (decoded-time-set-defaults (iso8601-parse string) 0))
1604 (wrong-type-argument 1605 (wrong-type-argument
1605 (message "Cannot decode \"%s\"" string) 1606 (message "Cannot decode \"%s\"" string)
1606 nil)) 1607 nil))