mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-05 11:45:45 +00:00
* lisp/net/tramp.el (tramp-action-process-alive): Read pending output.
This commit is contained in:
parent
e18c24b35a
commit
aa072db86b
@ -4074,6 +4074,8 @@ The terminal type can be configured with `tramp-terminal-type'."
|
||||
(defun tramp-action-process-alive (proc _vec)
|
||||
"Check, whether a process has finished."
|
||||
(unless (process-live-p proc)
|
||||
;; There might be pending output.
|
||||
(while (tramp-accept-process-output proc 0))
|
||||
(throw 'tramp-action 'process-died)))
|
||||
|
||||
(defun tramp-action-out-of-band (proc vec)
|
||||
|
Loading…
Reference in New Issue
Block a user