diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2018-04-13 16:38:10 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2018-04-13 16:38:10 +0200 |
| commit | 4a6302330384ad89bcfccce6b563eb5462b753a9 (patch) | |
| tree | 2695c81d4681e5e62fbbde9dbd9fd68707423f35 /lisp/url/url-util.el | |
| parent | 1fd104d30a8985e1f6962eb325207efad96273b6 (diff) | |
| download | emacs-4a6302330384ad89bcfccce6b563eb5462b753a9.tar.gz emacs-4a6302330384ad89bcfccce6b563eb5462b753a9.tar.bz2 emacs-4a6302330384ad89bcfccce6b563eb5462b753a9.zip | |
Make Unicode domain names work again in URL after recent changes
* lisp/net/gnutls.el (open-gnutls-stream): IDNA-encode hostnames
before passing them on to gnutls for verification.
* lisp/net/network-stream.el (network-stream-open-starttls): Ditto.
* lisp/url/url-http.el (url-http--get-referer): Be IDNA-aware.
(url-http-create-request): Don't de-Unicodify host names, because
they may be IDNA names (that are later encoded).
* lisp/url/url-util.el (url-domain): Be IDNA-aware when doing
domain name computations.
Diffstat (limited to 'lisp/url/url-util.el')
| -rw-r--r-- | lisp/url/url-util.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/url/url-util.el b/lisp/url/url-util.el index 77e015068a3..b2064484809 100644 --- a/lisp/url/url-util.el +++ b/lisp/url/url-util.el @@ -645,7 +645,7 @@ not contain a registered name." ;; ;; Domain delegations change rarely enough that we won't bother with ;; cache invalidation, I think. - (let* ((host-parts (split-string (url-host url) "\\.")) + (let* ((host-parts (split-string (puny-encode-domain (url-host url)) "\\.")) (result (gethash host-parts url--domain-cache 'not-found))) (when (eq result 'not-found) (setq result |