Commit da3b3a78 authored by Roland McGrath's avatar Roland McGrath
Browse files

(etags-list-tags): When there is an explicit tag name, skip the \177 before

it.
parent 1b4c60e2
......@@ -1132,7 +1132,7 @@ See documentation of variable `tags-file-name'."
(point)))))
(princ (if (looking-at "[^\n]+\001")
;; There is an explicit tag name; use that.
(buffer-substring (point)
(buffer-substring (1+ (point)) ;skip \177
(progn (skip-chars-forward "^\001")
(point)))
tag)))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment