procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix url-retrieve-synchronously on very short timeouts

Browse source 
* lisp/url/url.el (url-retrieve-synchronously): Don't kill the
process buffer unless we made one (bug#58218).  This makes HTTP
free connection marking work on premature timeouts.
This commit is contained in:
Lars Ingebrigtsen 2022-10-01 14:50:22 +02:00
parent 82860cb7f7
commit 41234a21bf
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/url/url.el
View file

@ -280,7 +280,9 @@ how long to wait for a response before giving up."
;; Querying over consumer internet in the US takes 100
;; ms, so split the difference.
(accept-process-output nil 0.05)))
(unless (eq data-buffer proc-buffer)
;; Kill the process buffer on redirects.
(when (and data-buffer
(not (eq data-buffer proc-buffer)))
(let (kill-buffer-query-functions)
(kill-buffer proc-buffer)))))
data-buffer))