From e946faaf51d3b5a1f6f9bc061546dd195c132a93 Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Wed, 7 Oct 2009 11:27:10 +0000 Subject: [PATCH] * net/tramp-cache.el (tramp-flush-connection-property): Add trace message. --- lisp/net/tramp-cache.el | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/lisp/net/tramp-cache.el b/lisp/net/tramp-cache.el index 3b1f4d46aad..1bb29d1766f 100644 --- a/lisp/net/tramp-cache.el +++ b/lisp/net/tramp-cache.el @@ -238,6 +238,13 @@ KEY identifies the connection, it is either a process or a vector." (when (vectorp key) (setq key (copy-sequence key)) (aset key 3 nil)) + (tramp-message + key 7 "%s %s" key + (let (properties) + (maphash + (lambda (x y) (add-to-list 'properties x 'append)) + (gethash key tramp-cache-data)) + properties)) (setq tramp-cache-data-changed t) (remhash key tramp-cache-data)) -- 2.39.2