Mercurial > emacs
changeset 110760:ad76d32381df
* url-http.el (url-http-wait-for-headers-change-function): Protect
against url-http-response-status for degenerate documents.
| author | Lars Magne Ingebrigtsen <larsi@gnus.org> |
|---|---|
| date | Mon, 04 Oct 2010 21:05:53 +0200 |
| parents | c476e521566f |
| children | d131be972bc8 |
| files | lisp/url/ChangeLog lisp/url/url-http.el |
| diffstat | 2 files changed, 7 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/url/ChangeLog Mon Oct 04 14:16:22 2010 -0400 +++ b/lisp/url/ChangeLog Mon Oct 04 21:05:53 2010 +0200 @@ -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.
--- a/lisp/url/url-http.el Mon Oct 04 14:16:22 2010 -0400 +++ b/lisp/url/url-http.el Mon Oct 04 21:05:53 2010 +0200 @@ -1054,7 +1054,8 @@ 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