Mercurial > emacs

diff lisp/net/tramp-cache.el @ 102906:dafde9e3d72b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* tramp-cache.el (tramp-flush-directory-property): Use the localname of KEY for check.
author Michael Albinus <michael.albinus@gmx.de>
date Thu, 09 Apr 2009 13:40:19 +0000
parents 0e77ae8c6b45
children 05be2b60df7a
line wrap: on
line diff
--- a/lisp/net/tramp-cache.el	Thu Apr 09 11:11:25 2009 +0000
+++ b/lisp/net/tramp-cache.el	Thu Apr 09 13:40:19 2009 +0000
@@ -138,7 +138,7 @@
   (tramp-message vec 8 "%s" directory)
     (maphash
      '(lambda (key value)
-	(when (and (stringp key)
+	(when (and (stringp (tramp-file-name-localname key))
 		   (string-match directory (tramp-file-name-localname key)))
 	  (remhash key tramp-cache-data)))
      tramp-cache-data)))