aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/url
diff options
context:
space:
mode:
authorLars Magne Ingebrigtsen <[email protected]>2011-04-16 15:59:54 +0200
committerLars Magne Ingebrigtsen <[email protected]>2011-04-16 15:59:54 +0200
commit10472dd0d62d986e048c01a3d37627b843a321d2 (patch)
treec3a60f7f115c89fad6442280d303b6cae3d2a116 /lisp/url
parentcf8b0c278be93e9584cf91315b2f11fc88da37a9 (diff)
(url-http-wait-for-headers-change-function): Protect against malformed headerless responses from servers.
Diffstat (limited to 'lisp/url')
-rw-r--r--lisp/url/ChangeLog5
-rw-r--r--lisp/url/url-http.el4
2 files changed, 9 insertions, 0 deletions
diff --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog
index f75a3444e0..528b63a644 100644
--- a/lisp/url/ChangeLog
+++ b/lisp/url/ChangeLog
@@ -1,3 +1,8 @@
+2011-04-16 Lars Magne Ingebrigtsen <[email protected]>
+
+ * url-http.el (url-http-wait-for-headers-change-function): Protect
+ against malformed headerless responses from servers.
+
2011-04-02 Chong Yidong <[email protected]>
* url-gw.el (url-open-stream): Use new open-network-stream
diff --git a/lisp/url/url-http.el b/lisp/url/url-http.el
index 07e57cf330..28071e7165 100644
--- a/lisp/url/url-http.el
+++ b/lisp/url/url-http.el
@@ -1077,6 +1077,10 @@ the end of the document."
(downcase url-http-transfer-encoding)))
(cond
+ ((null url-http-response-status)
+ ;; We got back a headerless malformed response from the
+ ;; server.
+ (url-http-activate-callback))
((or (= url-http-response-status 204)
(= url-http-response-status 205))
(url-http-debug "%d response must have headers only (%s)."