mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-27 16:51:06 -07:00
Code Issues Projects Releases Wiki Activity

Fix nasty scoping bug in tramp-cache.el

Browse source 
* lisp/net/tramp-cache.el (tramp-flush-file-property): Fix nasty scoping bug.
This commit is contained in:
Michael Albinus 2015-04-08 11:51:22 +02:00
parent 2346856168
commit b3f2874de2
1 changed files with 6 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

12
lisp/net/tramp-cache.el
View file

@ -174,12 +174,12 @@ Returns VALUE."
;; Remove file properties of symlinks.
(when (and (stringp truename)
(not (string-equal file (directory-file-name truename))))
(tramp-flush-file-property key truename)))
;; Unify localname.
(setq key (copy-sequence key))
(aset key 3 file)
(tramp-message key 8 "%s" file)
(remhash key tramp-cache-data))
(tramp-flush-file-property key truename))
;; Unify localname.
(setq key (copy-sequence key))
(aset key 3 file)
(tramp-message key 8 "%s" file)
(remhash key tramp-cache-data)))
;;;###tramp-autoload
(defun tramp-flush-directory-property (key directory)