Mercurial > emacs
changeset 452:ba75c4326ca8
*** empty log message ***
author | Eric S. Raymond <esr@snark.thyrsus.com> |
---|---|
date | Mon, 09 Dec 1991 04:28:44 +0000 |
parents | 1eb88445014d |
children | 7c8c17669828 |
files | lisp/progmodes/etags.el |
diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/etags.el Sun Dec 08 19:30:02 1991 +0000 +++ b/lisp/progmodes/etags.el Mon Dec 09 04:28:44 1991 +0000 @@ -146,9 +146,9 @@ (setq tagname last-tag)) (setq last-tag tagname) (while (progn - (if (not (search-forward - (if exact (concat tagname "(") tagname) - nil t)) + (if (not (if exact + (re-search-forward (concat "\\W" tagname "\\W") nil t) + (search-forward tagname nil t))) (error "No %sentries containing %s" (if next "more " "") tagname)) (not (looking-at "[^\n\177]*\177"))))