Mercurial > emacs

changeset 38273:910cd30b1586

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(ff-find-the-other-file): Use file-name-nondirectory instead of string-match to find the basename of the file. From Pascal Obry <p.obry@wanadoo.fr>.
author Eli Zaretskii <eliz@gnu.org>
date Tue, 03 Jul 2001 13:02:55 +0000
parents 8cefa08ce19c
children 409461439864
files lisp/find-file.el
diffstat 1 files changed, 1 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/find-file.el	Tue Jul 03 12:41:58 2001 +0000
+++ b/lisp/find-file.el	Tue Jul 03 13:02:55 2001 +0000
@@ -422,8 +422,7 @@
                          (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))