mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-19 11:27:34 +00:00
(url-retrieve-synchronously): Call delete-process.
This commit is contained in:
parent
bb189688f6
commit
9ffb952120
2 changed files with 7 additions and 1 deletions
|
|
@ -1,3 +1,7 @@
|
|||
2007-11-15 Richard Stallman <rms@gnu.org>
|
||||
|
||||
* url.el (url-retrieve-synchronously): Call delete-process.
|
||||
|
||||
2007-10-13 Richard Stallman <rms@gnu.org>
|
||||
|
||||
* url-util.el (url-basepath): Function deleted.
|
||||
|
|
|
|||
|
|
@ -240,7 +240,9 @@ no further processing). URL is either a string or a parsed URL."
|
|||
;; XXX: The callback must always be called. Any
|
||||
;; exception is a bug that should be fixed, not worked
|
||||
;; around.
|
||||
(setq retrieval-done t))
|
||||
(progn ;; Call delete-process so we run any sentinel now.
|
||||
(delete-process proc)
|
||||
(setq retrieval-done t)))
|
||||
;; We used to use `sit-for' here, but in some cases it wouldn't
|
||||
;; work because apparently pending keyboard input would always
|
||||
;; interrupt it before it got a chance to handle process input.
|
||||
|
|
|
|||
Loading…
Reference in a new issue