diff options
| author | Michael Albinus | 2019-09-04 09:37:37 +0200 |
|---|---|---|
| committer | Michael Albinus | 2019-09-04 09:37:37 +0200 |
| commit | 6c2e107a54fe39bbd6ce31d9f29464da33bbf4af (patch) | |
| tree | 661bc2d2a52e0b0f747d51148a0235dbddb9c8b6 | |
| parent | 22213f00527d96355e1e3d8a4c9bc37b1fffb0f0 (diff) | |
| download | emacs-6c2e107a54fe39bbd6ce31d9f29464da33bbf4af.tar.gz emacs-6c2e107a54fe39bbd6ce31d9f29464da33bbf4af.zip | |
* lisp/net/tramp.el (tramp-process-sentinel): Use `process-buffer'.
| -rw-r--r-- | lisp/net/tramp.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el index fdad43ef6fa..ed0f1def181 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 | |||
| 4210 | (when vec | 4210 | (when vec |
| 4211 | (tramp-message vec 5 "Sentinel called: `%S' `%s'" proc event) | 4211 | (tramp-message vec 5 "Sentinel called: `%S' `%s'" proc event) |
| 4212 | (tramp-flush-connection-properties proc) | 4212 | (tramp-flush-connection-properties proc) |
| 4213 | (tramp-flush-directory-properties vec "") | 4213 | (tramp-flush-directory-properties vec "")) |
| 4214 | (with-current-buffer (tramp-get-buffer vec) | 4214 | (with-current-buffer (process-buffer proc) |
| 4215 | (goto-char (point-max)) | 4215 | (goto-char (point-max)) |
| 4216 | (when (and prompt (re-search-backward (regexp-quote prompt) nil t)) | 4216 | (when (and prompt (re-search-backward (regexp-quote prompt) nil t)) |
| 4217 | (delete-region (point) (point-max)))))))) | 4217 | (delete-region (point) (point-max))))))) |
| 4218 | 4218 | ||
| 4219 | (defun tramp-get-inode (vec) | 4219 | (defun tramp-get-inode (vec) |
| 4220 | "Returns the virtual inode number. | 4220 | "Returns the virtual inode number. |