summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1996-04-05 19:11:05 +0000
committerRichard M. Stallman <rms@gnu.org>1996-04-05 19:11:05 +0000
commite6b5062ad1f84821c5fa771851b18bac74887cad (patch)
tree65ce7038e52d8369746f050eee542f79f76c0741 /lisp
parent9b97fa2cb800a1f00dff8f7c6092dcad3350dae1 (diff)
downloademacs-e6b5062ad1f84821c5fa771851b18bac74887cad.tar.gz
(dired-noselect): Resolve symbolic links in argument.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/dired.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/dired.el b/lisp/dired.el
index 18f865551a6..76ce9e8d45d 100644
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -386,6 +386,8 @@ If DIRNAME is already in a dired buffer, that buffer is used without refresh."
(setq dirname dir-or-list))
(setq dirname (abbreviate-file-name
(expand-file-name (directory-file-name dirname))))
+ (if find-file-visit-truename
+ (setq dirname (file-truename dirname)))
(if (file-directory-p dirname)
(setq dirname (file-name-as-directory dirname)))
(if (consp dir-or-list)