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

(find-file-noselect): Suppress same-file warning if

Browse source 
both filenames would print identically.
This commit is contained in:
Richard M. Stallman 1994-05-09 22:54:09 +00:00
parent 4f5d303b20
commit 327bebe804
1 changed files with 4 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/files.el
View file

@ -631,8 +631,10 @@ The buffer is not selected, just returned to the caller."
;; Let user know if there is a buffer with the same truename.
(if other
(progn
(or nowarn (message "%s and %s are the same file"
filename (buffer-file-name other)))
(or nowarn
(string-equal filename (buffer-file-name other))
(message "%s and %s are the same file"
filename (buffer-file-name other)))
;; Optionally also find that buffer.
(if (or find-file-existing-other-name find-file-visit-truename)
(setq buf other))))