diff options
| author | Eric S. Raymond <esr@snark.thyrsus.com> | 1991-12-09 04:28:44 +0000 |
|---|---|---|
| committer | Eric S. Raymond <esr@snark.thyrsus.com> | 1991-12-09 04:28:44 +0000 |
| commit | a7a50f69a016a687449acbf138eb5bfc3ce527c2 (patch) | |
| tree | c242a8501adcd519561fc4b50aac2a65166a1410 /lisp/progmodes | |
| parent | ff704742cd978602a4b7c8b7cca0d0ae4d5f2cf8 (diff) | |
| download | emacs-a7a50f69a016a687449acbf138eb5bfc3ce527c2.tar.gz | |
*** empty log message ***
Diffstat (limited to 'lisp/progmodes')
| -rw-r--r-- | lisp/progmodes/etags.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el index 15181e899d7..c5d39891dbc 100644 --- a/lisp/progmodes/etags.el +++ b/lisp/progmodes/etags.el @@ -146,9 +146,9 @@ File names returned are absolute." (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")))) |