andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(ff-find-the-other-file): Use file-name-nondirectory

Browse source 
instead of string-match to find the basename of the file.  From
Pascal Obry <p.obry@wanadoo.fr>.
This commit is contained in:
Eli Zaretskii 2001-07-03 13:02:55 +00:00
parent 51a91c0910
commit f4a9721617
1 changed files with 1 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/find-file.el
View file

@ -422,8 +422,7 @@ If optional IN-OTHER-WINDOW is non-nil, find the file in another window."
(buffer-file-name)
"/none.none"))
(string-match ".*/\\(.+\\)$" pathname)
(setq fname (substring pathname (match-beginning 1) (match-end 1))
(setq fname (file-name-nondirectory pathname)
no-match nil
match (car alist))