procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(find-file-noselect): Respect the value of

Browse source 
find-file-visit-truename when FILENAME is a directory and
find-file-run-dired is non-nil.
This commit is contained in:
Karl Heuer 1995-11-10 19:12:42 +00:00
parent d0fc03efcf
commit 4147a3ccb5
1 changed files with 3 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/files.el
View file

@ -712,7 +712,9 @@ The buffer is not selected, just returned to the caller."
(expand-file-name filename)))
(if (file-directory-p filename)
(if find-file-run-dired
(dired-noselect filename)
(dired-noselect (if find-file-visit-truename
(abbreviate-file-name (file-truename filename))
filename))
(error "%s is a directory." filename))
(let* ((buf (get-file-buffer filename))
(truename (abbreviate-file-name (file-truename filename)))