summaryrefslogtreecommitdiff
path: root/lisp/net
diff options
context:
space:
mode:
authorMichael Albinus <michael.albinus@gmx.de>2019-06-15 11:33:16 +0200
committerMichael Albinus <michael.albinus@gmx.de>2019-06-15 11:33:16 +0200
commit38a86a4c490348e74ad1c395ad66176f15d1ce20 (patch)
treecc143f6ddf6bba4b8cf72b26aa9326979acf81c4 /lisp/net
parent7d71d0b13d311f60183358a1df696652785f97dc (diff)
downloademacs-38a86a4c490348e74ad1c395ad66176f15d1ce20.tar.gz
Some changes in process output read of Tramp
* lisp/net/tramp.el (tramp-handle-file-notify-rm-watch): Read pending output. * test/lisp/net/tramp-tests.el (tramp-test31-interrupt-process): Use a timeout when reading process output.
Diffstat (limited to 'lisp/net')
-rw-r--r--lisp/net/tramp.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el
index 76eb03b89e0..5086ceb9f3b 100644
--- a/lisp/net/tramp.el
+++ b/lisp/net/tramp.el
@@ -3865,6 +3865,8 @@ of."
;; The descriptor must be a process object.
(unless (processp proc)
(tramp-error proc 'file-notify-error "Not a valid descriptor %S" proc))
+ ;; There might be pending output.
+ (while (tramp-accept-process-output proc 0))
(tramp-message proc 6 "Kill %S" proc)
(delete-process proc))