summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2007-09-21 02:53:08 +0000
committerGlenn Morris <rgm@gnu.org>2007-09-21 02:53:08 +0000
commitfbc09406ca6ee155d2e999f9f2736cccfdbf39e5 (patch)
tree17990394cd6134880a6039076b10e672f1fea51e
parent92d175e2d9afe34e0a91ef4cd37fe8d9d60d0727 (diff)
downloademacs-fbc09406ca6ee155d2e999f9f2736cccfdbf39e5.tar.gz
emacs-fbc09406ca6ee155d2e999f9f2736cccfdbf39e5.tar.bz2
emacs-fbc09406ca6ee155d2e999f9f2736cccfdbf39e5.zip
Diane Murray <disumu at x3y2z1.net>
(url-get-normalized-date): Pass full timezone information to timezone-make-date-arpa-standard, since zone name may be unknown.
-rw-r--r--lisp/url/ChangeLog6
-rw-r--r--lisp/url/url-util.el2
2 files changed, 7 insertions, 1 deletions
diff --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog
index 03839b0f922..3aa5d63ddc0 100644
--- a/lisp/url/ChangeLog
+++ b/lisp/url/ChangeLog
@@ -1,3 +1,9 @@
+2007-09-21 Diane Murray <disumu@x3y2z1.net>
+
+ * url-util.el (url-get-normalized-date): Pass full timezone
+ information to timezone-make-date-arpa-standard, since zone name
+ may be unknown.
+
2007-09-03 Diane Murray <disumu@x3y2z1.net>
* url-http.el: (url-http-parse-headers): Bind the current buffer
diff --git a/lisp/url/url-util.el b/lisp/url/url-util.el
index fa971da5d17..082ceaea416 100644
--- a/lisp/url/url-util.el
+++ b/lisp/url/url-util.el
@@ -190,7 +190,7 @@ Will not do anything if `url-show-status' is nil."
(let* ((raw (if specified-time (current-time-string specified-time)
(current-time-string)))
(gmt (timezone-make-date-arpa-standard raw
- (nth 1 (current-time-zone))
+ (current-time-zone)
"GMT"))
(parsed (timezone-parse-date gmt))
(day (cdr-safe (assoc (substring raw 0 3) url-weekday-alist)))