summaryrefslogtreecommitdiff
path: root/lisp/url/url-gw.el
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2016-02-16 13:01:05 +1100
committerLars Ingebrigtsen <larsi@gnus.org>2016-02-16 13:01:05 +1100
commit7f3441cc3335b5faf7cb52458256dbbbaaaf9fa7 (patch)
tree8a2accf5bdd6d2623c05d7098b442722f8361260 /lisp/url/url-gw.el
parent2d7af7e206c746bc774ae34de88dc2c20ea1b07d (diff)
downloademacs-7f3441cc3335b5faf7cb52458256dbbbaaaf9fa7.tar.gz
Do most of the coding system setup earlier
* src/process.c (Fmake_network_process): Set the read/write coding systems here, so that special bindings work. (Fmake_network_process): Complete the coding system setup here.
Diffstat (limited to 'lisp/url/url-gw.el')
-rw-r--r--lisp/url/url-gw.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/url/url-gw.el b/lisp/url/url-gw.el
index 8bd35a53778..2b552df69d9 100644
--- a/lisp/url/url-gw.el
+++ b/lisp/url/url-gw.el
@@ -246,7 +246,7 @@ overriding the value of `url-gateway-method'."
:type gw-method
;; Use non-blocking socket if we can.
:nowait (featurep 'make-network-process
- '(:nowait t))))
+ '(:nowait t))))
(`socks
(socks-open-network-stream name buffer host service))
(`telnet
@@ -256,6 +256,7 @@ overriding the value of `url-gateway-method'."
(_
(error "Bad setting of url-gateway-method: %s"
url-gateway-method))))))
+ (message "Coding system: %s" (process-coding-system conn))
conn)))
(provide 'url-gw)