(dired-noselect): Call abbreviate-file-name here.

(dired-internal-noselect): Not here.

diff --git a/lisp/dired.el b/lisp/dired.el
index f65197b41183fb7fbb2f885e5ea6c81a6fb167c6..705c1b8abb7a671425af27ffd73a1851abdae2fb 100644 (file)
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -365,7 +365,8 @@ If DIRNAME is already in a dired buffer, that buffer is used without refresh."
     (if (consp dir-or-list)
        (setq dirname (car dir-or-list))
       (setq dirname dir-or-list))
-    (setq dirname (expand-file-name (directory-file-name dirname)))
+    (setq dirname (abbreviate-file-name
+                  (expand-file-name (directory-file-name dirname))))
     (if (file-directory-p dirname)
        (setq dirname (file-name-as-directory dirname)))
     (if (consp dir-or-list)
@@ -410,10 +411,9 @@ If DIRNAME is already in a dired buffer, that buffer is used without refresh."
            (message "Directory has changed on disk; type `g' to update Dired")))
       ;; Else a new buffer
       (setq default-directory
-           (abbreviate-file-name
-            (if (file-directory-p dirname)
-                dirname
-              (file-name-directory dirname))))
+           (if (file-directory-p dirname)
+               dirname
+             (file-name-directory dirname)))
       (or switches (setq switches dired-listing-switches))
       (dired-mode dirname switches)
       ;; default-directory and dired-actual-switches are set now