diff options
| author | Lars Magne Ingebrigtsen <larsi@gnus.org> | 2010-10-04 21:05:53 +0200 |
|---|---|---|
| committer | Lars Magne Ingebrigtsen <larsi@gnus.org> | 2010-10-04 21:05:53 +0200 |
| commit | 697ebdb06b70c96e79b844216c305c3ec2eb7f07 (patch) | |
| tree | 6f14fe3861c3bab4d5ab427c3254fc269808b368 /lisp/url | |
| parent | 51b403bdcb9af76833a11a668cc9be0f49d62e72 (diff) | |
| download | emacs-697ebdb06b70c96e79b844216c305c3ec2eb7f07.tar.gz | |
* url-http.el (url-http-wait-for-headers-change-function): Protect
against url-http-response-status for degenerate documents.
Diffstat (limited to 'lisp/url')
| -rw-r--r-- | lisp/url/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/url/url-http.el | 3 |
2 files changed, 7 insertions, 1 deletions
diff --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog index f50808ff8dd..720f682d225 100644 --- a/lisp/url/ChangeLog +++ b/lisp/url/ChangeLog @@ -1,3 +1,8 @@ +2010-10-04 Lars Magne Ingebrigtsen <larsi@gnus.org> + + * url-http.el (url-http-wait-for-headers-change-function): Protect + against url-http-response-status for degenerate documents. + 2010-10-03 Glenn Morris <rgm@gnu.org> * url-util.el (url-get-url-filename-chars): Don't eval-and-compile. diff --git a/lisp/url/url-http.el b/lisp/url/url-http.el index 1c9c8c8a3de..71de213b64b 100644 --- a/lisp/url/url-http.el +++ b/lisp/url/url-http.el @@ -1054,7 +1054,8 @@ the end of the document." end-of-headers t) (url-http-clean-headers))) - (if (not end-of-headers) + (if (or (not end-of-headers) + (not url-http-response-status)) ;; Haven't seen the end of the headers yet, need to wait ;; for more data to arrive. nil |