[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 9c2ce57: Fix stale cache problem in Tramp
From: |
Michael Albinus |
Subject: |
[Emacs-diffs] master 9c2ce57: Fix stale cache problem in Tramp |
Date: |
Mon, 15 Aug 2016 10:29:34 +0000 (UTC) |
branch: master
commit 9c2ce57719d0db8ac0a01b65d7e8d7ccc3f2d6ca
Author: Michael Albinus <address@hidden>
Commit: Michael Albinus <address@hidden>
Fix stale cache problem in Tramp
* lisp/net/tramp-cache.el (tramp-get-connection-property):
Check, that a process as key is still running. (Bug#22478)
---
lisp/net/tramp-cache.el | 11 ++++++++---
1 file changed, 8 insertions(+), 3 deletions(-)
diff --git a/lisp/net/tramp-cache.el b/lisp/net/tramp-cache.el
index 07176be..76b49a0 100644
--- a/lisp/net/tramp-cache.el
+++ b/lisp/net/tramp-cache.el
@@ -237,9 +237,14 @@ connection, returns DEFAULT."
(aset key 3 nil)
(aset key 4 nil))
(let* ((hash (tramp-get-hash-table key))
- (value (if (hash-table-p hash)
- (gethash property hash default)
- default)))
+ (value
+ ;; If the key is an auxiliary process object, check whether
+ ;; the process is still alive.
+ (if (and (processp key) (not (memq (process-status key) '(run open))))
+ default
+ (if (hash-table-p hash)
+ (gethash property hash default)
+ default))))
(tramp-message key 7 "%s %s" property value)
value))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 9c2ce57: Fix stale cache problem in Tramp,
Michael Albinus <=