mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-28 07:45:00 +00:00
Code Issues Releases Activity

Fix tramp-accept-process-output

Browse Source 
* lisp/net/tramp.el (tramp-accept-process-output):
Use `with-tramp-suspended-timers' also for the other processes.
This commit is contained in:
Michael Albinus 2023-08-29 14:16:15 +02:00
parent 88bb7cdf91
commit 6b3e3ff699
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/net/tramp.el
View File

@ -5615,7 +5615,8 @@ 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))
(with-local-quit (accept-process-output p 0 nil t)))))
(with-tramp-suspended-timers
(with-local-quit (accept-process-output p 0 nil t))))))
(with-current-buffer (process-buffer proc)
(let ((inhibit-read-only t)