[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 6c2e107: * lisp/net/tramp.el (tramp-process-sentine
From: |
Michael Albinus |
Subject: |
[Emacs-diffs] master 6c2e107: * lisp/net/tramp.el (tramp-process-sentinel): Use `process-buffer'. |
Date: |
Wed, 4 Sep 2019 03:37:49 -0400 (EDT) |
branch: master
commit 6c2e107a54fe39bbd6ce31d9f29464da33bbf4af
Author: Michael Albinus <address@hidden>
Commit: Michael Albinus <address@hidden>
* lisp/net/tramp.el (tramp-process-sentinel): Use `process-buffer'.
---
lisp/net/tramp.el | 10 +++++-----
1 file changed, 5 insertions(+), 5 deletions(-)
diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el
index fdad43e..ed0f1de 100644
--- a/lisp/net/tramp.el
+++ b/lisp/net/tramp.el
@@ -4210,11 +4210,11 @@ the remote host use line-endings as defined in the
variable
(when vec
(tramp-message vec 5 "Sentinel called: `%S' `%s'" proc event)
(tramp-flush-connection-properties proc)
- (tramp-flush-directory-properties vec "")
- (with-current-buffer (tramp-get-buffer vec)
- (goto-char (point-max))
- (when (and prompt (re-search-backward (regexp-quote prompt) nil t))
- (delete-region (point) (point-max))))))))
+ (tramp-flush-directory-properties vec ""))
+ (with-current-buffer (process-buffer proc)
+ (goto-char (point-max))
+ (when (and prompt (re-search-backward (regexp-quote prompt) nil t))
+ (delete-region (point) (point-max)))))))
(defun tramp-get-inode (vec)
"Returns the virtual inode number.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 6c2e107: * lisp/net/tramp.el (tramp-process-sentinel): Use `process-buffer'.,
Michael Albinus <=