[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] trunk r117646: * net/tramp-cache.el (tramp-flush-file-func
From: |
Michael Albinus |
Subject: |
[Emacs-diffs] trunk r117646: * net/tramp-cache.el (tramp-flush-file-function): Suppress function |
Date: |
Tue, 05 Aug 2014 08:13:37 +0000 |
User-agent: |
Bazaar (2.6b2) |
------------------------------------------------------------
revno: 117646
revision-id: address@hidden
parent: address@hidden
committer: Michael Albinus <address@hidden>
branch nick: trunk
timestamp: Tue 2014-08-05 10:13:28 +0200
message:
* net/tramp-cache.el (tramp-flush-file-function): Suppress function
also for Tramp working buffers.
modified:
lisp/ChangeLog changelog-20091113204419-o5vbwnq5f7feedwu-1432
lisp/net/tramp-cache.el
trampcache.el-20091113204419-o5vbwnq5f7feedwu-5065
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2014-08-04 21:35:17 +0000
+++ b/lisp/ChangeLog 2014-08-05 08:13:28 +0000
@@ -1,3 +1,8 @@
+2014-08-05 Michael Albinus <address@hidden>
+
+ * net/tramp-cache.el (tramp-flush-file-function): Suppress function
+ also for Tramp working buffers.
+
2014-08-04 Fabián Ezequiel Gallina <address@hidden>
* progmodes/python.el: Fix completions inside (i)pdb.
=== modified file 'lisp/net/tramp-cache.el'
--- a/lisp/net/tramp-cache.el 2014-07-24 07:30:36 +0000
+++ b/lisp/net/tramp-cache.el 2014-08-05 08:13:28 +0000
@@ -207,7 +207,12 @@
"Flush all Tramp cache properties from `buffer-file-name'.
This is suppressed for temporary buffers."
(save-match-data
- (unless (string-match "^ \\*temp\\*" (or (buffer-name) ""))
+ (unless
+ (string-match
+ (concat
+ "^" (regexp-opt '("*tramp/" "*debug tramp/" " *temp*") 'parent))
+ (or (buffer-name) ""))
+
(let ((bfn (if (stringp (buffer-file-name))
(buffer-file-name)
default-directory)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] trunk r117646: * net/tramp-cache.el (tramp-flush-file-function): Suppress function,
Michael Albinus <=