Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-21 12:27:33 +00:00
Code Issues Projects Releases Packages Wiki Activity

(tag-exact-match-p): Fix typo in last change.

Browse source
This commit is contained in:
Roland McGrath 1994-06-28 20:24:38 +00:00
parent 63aeffd5a0
commit 40ce92683c
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/progmodes/etags.el
View file

@ -1150,7 +1150,7 @@ See documentation of variable `tags-file-name'."
(defun tag-exact-match-p (tag)
;; The match is really exact if there is an explicit tag name.
(or (and (eq (char-after (point)) ?\001)
(eq (char-after (- (point) (length tag)) ?\177)))
(eq (char-after (- (point) (length tag) 1)) ?\177))
;; We are not on the explicit tag name, but perhaps it follows.
(looking-at (concat "[^\177\n]*\177" (regexp-quote tag) "\001"))
;; We also call it "exact" if it is surrounded by symbol boundaries.