Mercurial > emacs
diff lisp/log-edit.el @ 90185:5b029ff3b08d
Revision: miles@gnu.org--gnu-2005/emacs--unicode--0--patch-55
Merge from emacs--cvs-trunk--0
Patches applied:
* emacs--cvs-trunk--0 (patch 320-323)
- Update from CVS
| author | Miles Bader <miles@gnu.org> |
|---|---|
| date | Thu, 26 May 2005 05:42:19 +0000 |
| parents | 3ebd9bdb4fe5 08bad0f3de3f |
| children | a1b34dec1104 |
line wrap: on
line diff
--- a/lisp/log-edit.el Sun May 22 08:23:26 2005 +0000 +++ b/lisp/log-edit.el Thu May 26 05:42:19 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