diff options
| author | Lars Magne Ingebrigtsen | 2010-10-04 21:34:35 +0200 |
|---|---|---|
| committer | Lars Magne Ingebrigtsen | 2010-10-04 21:34:35 +0200 |
| commit | d23832a2cc30f28e1d754fcd4a497c8ba7ca5b18 (patch) | |
| tree | 8350a917e10422edfb07d6edc00a01b8474784da | |
| parent | 697ebdb06b70c96e79b844216c305c3ec2eb7f07 (diff) | |
| download | emacs-d23832a2cc30f28e1d754fcd4a497c8ba7ca5b18.tar.gz emacs-d23832a2cc30f28e1d754fcd4a497c8ba7ca5b18.zip | |
(url-http-wait-for-headers-change-function): Revert previous
change. It lead to really slow loads.
| -rw-r--r-- | lisp/url/ChangeLog | 2 | ||||
| -rw-r--r-- | lisp/url/url-http.el | 3 |
2 files changed, 3 insertions, 2 deletions
diff --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog index 720f682d225..37a635e9906 100644 --- a/lisp/url/ChangeLog +++ b/lisp/url/ChangeLog | |||
| @@ -2,6 +2,8 @@ | |||
| 2 | 2 | ||
| 3 | * url-http.el (url-http-wait-for-headers-change-function): Protect | 3 | * url-http.el (url-http-wait-for-headers-change-function): Protect |
| 4 | against url-http-response-status for degenerate documents. | 4 | against url-http-response-status for degenerate documents. |
| 5 | (url-http-wait-for-headers-change-function): Revert previous | ||
| 6 | change. It lead to really slow loads. | ||
| 5 | 7 | ||
| 6 | 2010-10-03 Glenn Morris <rgm@gnu.org> | 8 | 2010-10-03 Glenn Morris <rgm@gnu.org> |
| 7 | 9 | ||
diff --git a/lisp/url/url-http.el b/lisp/url/url-http.el index 71de213b64b..1c9c8c8a3de 100644 --- a/lisp/url/url-http.el +++ b/lisp/url/url-http.el | |||
| @@ -1054,8 +1054,7 @@ the end of the document." | |||
| 1054 | end-of-headers t) | 1054 | end-of-headers t) |
| 1055 | (url-http-clean-headers))) | 1055 | (url-http-clean-headers))) |
| 1056 | 1056 | ||
| 1057 | (if (or (not end-of-headers) | 1057 | (if (not end-of-headers) |
| 1058 | (not url-http-response-status)) | ||
| 1059 | ;; Haven't seen the end of the headers yet, need to wait | 1058 | ;; Haven't seen the end of the headers yet, need to wait |
| 1060 | ;; for more data to arrive. | 1059 | ;; for more data to arrive. |
| 1061 | nil | 1060 | nil |