Commit 6c2e107a authored by Michael Albinus's avatar Michael Albinus

* lisp/net/tramp.el (tramp-process-sentinel): Use `process-buffer'.

parent 22213f00
Pipeline #3046 failed with stage
in 55 minutes and 6 seconds
...@@ -4210,11 +4210,11 @@ the remote host use line-endings as defined in the variable ...@@ -4210,11 +4210,11 @@ the remote host use line-endings as defined in the variable
(when vec (when vec
(tramp-message vec 5 "Sentinel called: `%S' `%s'" proc event) (tramp-message vec 5 "Sentinel called: `%S' `%s'" proc event)
(tramp-flush-connection-properties proc) (tramp-flush-connection-properties proc)
(tramp-flush-directory-properties vec "") (tramp-flush-directory-properties vec ""))
(with-current-buffer (tramp-get-buffer vec) (with-current-buffer (process-buffer proc)
(goto-char (point-max)) (goto-char (point-max))
(when (and prompt (re-search-backward (regexp-quote prompt) nil t)) (when (and prompt (re-search-backward (regexp-quote prompt) nil t))
(delete-region (point) (point-max)))))))) (delete-region (point) (point-max)))))))
(defun tramp-get-inode (vec) (defun tramp-get-inode (vec)
"Returns the virtual inode number. "Returns the virtual inode number.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment