changeset 62707:08bad0f3de3f

(log-edit-changelog-entries): Distinguish between filenames like xfns.c and fns.c. Coded by Stefan Monnier <monnier@iro.umontreal.ca>.
author Nick Roberts <nickrob@snap.net.nz>
date Wed, 25 May 2005 21:29:56 +0000
parents a303c49e1df5
children 23e016b887bb
files lisp/log-edit.el
diffstat 1 files changed, 6 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/log-edit.el	Wed May 25 21:29:24 2005 +0000
+++ b/lisp/log-edit.el	Wed May 25 21:29:56 2005 +0000
@@ -607,8 +607,12 @@
 			   (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 @@
 
 (provide 'log-edit)
 
-;;; arch-tag: 8089b39c-983b-4e83-93cd-ed0a64c7fdcc
+;; arch-tag: 8089b39c-983b-4e83-93cd-ed0a64c7fdcc
 ;;; log-edit.el ends here