diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2016-02-05 14:03:26 +1100 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2016-02-05 14:03:26 +1100 |
| commit | 12702b312bdb63b15619fac682f3a2c205b94eba (patch) | |
| tree | b5219b71c8329730821eaee23b6b9af112b11e7c /lisp/url | |
| parent | c85e7d4c8c899c01d6b4a393512bab295ef635c1 (diff) | |
| download | emacs-12702b312bdb63b15619fac682f3a2c205b94eba.tar.gz | |
Make url.el use async DNS
* lisp/url/url-gw.el (url-open-stream): Use non-blocking DNS.
* src/process.c (syms_of_process): Add a `dns' subfeature for
make-network-process.
Diffstat (limited to 'lisp/url')
| -rw-r--r-- | lisp/url/url-gw.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/url/url-gw.el b/lisp/url/url-gw.el index 460ee0dd426..4d1dce68cbe 100644 --- a/lisp/url/url-gw.el +++ b/lisp/url/url-gw.el @@ -245,8 +245,9 @@ overriding the value of `url-gateway-method'." name buffer host service :type gw-method ;; Use non-blocking socket if we can. - :nowait (featurep 'make-network-process - '(:nowait t)))) + :nowait (and (featurep 'make-network-process + '(:nowait t)) + 'dns))) (`socks (socks-open-network-stream name buffer host service)) (`telnet |