mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-27 07:37:33 +00:00
Code Issues Releases Activity

(diff-find-file-name): Fix regex subgroup number.

Browse Source
This commit is contained in:
Stefan Monnier 2000-10-19 15:42:21 +00:00
parent 5de037e099
commit 9b1ac2f66e
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/diff-mode.el
View File

@ -4,7 +4,7 @@
;; Author: Stefan Monnier <monnier@cs.yale.edu>
;; Keywords: patch diff
;; Revision: $Id: diff-mode.el,v 1.31 2000/10/17 15:55:09 monnier Exp $
;; Revision: $Id: diff-mode.el,v 1.32 2000/10/18 08:50:39 eliz Exp $
;; This file is part of GNU Emacs.
@ -440,8 +440,8 @@ Non-nil OLD means that we want the old file."
(error (point-min)))))
(header-files
(if (looking-at "[-*][-*][-*] \\(\\S-+\\)\\(\\s-.*\\)?\n[-+][-+][-+] \\(\\S-+\\)")
(list (if old (match-string 1) (match-string 2))
(if old (match-string 2) (match-string 1)))
(list (if old (match-string 1) (match-string 3))
(if old (match-string 3) (match-string 1)))
(forward-line 1) nil))
(fs (append
(when (save-excursion