From: Nick Roberts <nickrob@snap.net.nz>
Date: Wed, 25 May 2005 21:29:56 +0000 (+0000)
Subject: (log-edit-changelog-entries): Distinguish between
X-Git-Tag: emacs-pretest-22.0.90~9581
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b543ff57ce9d41d360b882696f839e2e069748a5;p=emacs.git

(log-edit-changelog-entries): Distinguish between
filenames like xfns.c and fns.c.
Coded by Stefan Monnier  <monnier@iro.umontreal.ca>.
---

diff --git a/lisp/log-edit.el b/lisp/log-edit.el
index 1fa48b65aee..09116e0584f 100644
--- a/lisp/log-edit.el
+++ b/lisp/log-edit.el
@@ -607,8 +607,12 @@ where LOGBUFFER is the name of the ChangeLog buffer, and each
 			   (search-forward pattern nil t))))
 		(setq pattern (file-name-nondirectory file)))
 
+            (setq pattern (concat "\\(^\\|[^[:alnum:]]\\)"
+                                  pattern
+                                  "\\($\\|[^[:alnum:]]\\)"))
+
 	    (let (texts)
-	      (while (search-forward pattern nil t)
+	      (while (re-search-forward pattern nil t)
 		(let ((entry (log-edit-changelog-entry)))
 		  (push entry texts)
 		  (goto-char (elt entry 1))))
@@ -646,5 +650,5 @@ Sort REGIONS front-to-back first."
 
 (provide 'log-edit)
 
-;;; arch-tag: 8089b39c-983b-4e83-93cd-ed0a64c7fdcc
+;; arch-tag: 8089b39c-983b-4e83-93cd-ed0a64c7fdcc
 ;;; log-edit.el ends here