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

* lisp/net/tramp.el (tramp-accept-process-output): Use `with-local-quit'.

Browse source
This commit is contained in:
Michael Albinus 2023-03-31 09:45:23 +02:00
parent 73a320801e
commit 06743df33a
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/net/tramp.el
View file

@ -5815,7 +5815,7 @@ If the user quits via `C-g', it is propagated up to `tramp-file-name-handler'."
(v (process-get proc 'tramp-vector)))
(dolist (p (delq proc (process-list)))
(when (tramp-file-name-equal-p v (process-get p 'tramp-vector))
(accept-process-output p 0 nil t))))
(with-local-quit (accept-process-output p 0 nil t)))))
(with-current-buffer (process-buffer proc)
(let ((inhibit-read-only t)