summaryrefslogtreecommitdiff
path: root/lisp/dired.el
diff options
context:
space:
mode:
authorMichael Albinus <michael.albinus@gmx.de>2010-02-04 17:25:57 +0100
committerMichael Albinus <michael.albinus@gmx.de>2010-02-04 17:25:57 +0100
commitd5b3979c8a0129ab007179a8d6e554dfbcfaa24d (patch)
tree29a4f60bb891e4e4f8f5136b1215f9229f446a26 /lisp/dired.el
parent6c594ec63d2a81aabd59883d0ae1baffa77b2dd0 (diff)
downloademacs-d5b3979c8a0129ab007179a8d6e554dfbcfaa24d.tar.gz
* dired.el (dired-revert): If DIRED-DIRECTORY is a cons cell, call
`dired-uncache' for every elemnt which is an absolute file name. * net/tramp.el (tramp-handle-dired-uncache): When DIR is not a directory, handle its directory component. (tramp-handle-file-remote-p): Let-bind `tramp-verbose' to 3; this function is called permanently and creates noise, otherwise. * net/tramp-imap.el (tramp-imap-handle-insert-directory): * net/tramp-smb.el (tramp-smb-handle-insert-directory): Handle the case, FILENAME is not in `default-directory'. (Bug#5478)
Diffstat (limited to 'lisp/dired.el')
-rw-r--r--lisp/dired.el8
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/dired.el b/lisp/dired.el
index 1fc90c308b1..c3d1435401e 100644
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -1144,8 +1144,12 @@ Preserves old cursor, marks/flags, hidden-p."
(setq mark-alist;; only after dired-remember-hidden since this unhides:
(dired-remember-marks (point-min) (point-max)))
;; treat top level dir extra (it may contain wildcards)
- (dired-uncache
- (if (consp dired-directory) (car dired-directory) dired-directory))
+ (if (not (consp dired-directory))
+ (dired-uncache dired-directory)
+ (dired-uncache (car dired-directory))
+ (dolist (dir (cdr dired-directory))
+ (if (file-name-absolute-p dir)
+ (dired-uncache dir))))
;; Run dired-after-readin-hook just once, below.
(let ((dired-after-readin-hook nil))
(dired-readin)