Commit 280a1a65 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(etags-goto-tag-location): If match started with Ctrl-m,

compensate when setting point.
parent 651c847c
......@@ -975,6 +975,11 @@ See documentation of variable `tags-file-name'."
(re-search-forward pat nil t)
(error "`%s' not found in %s; time to rerun etags"
pat buffer-file-name)))
;; Position point at the right place
;; if the search string matched an extra Ctrl-m at the beginning.
(and (eq selective-display t)
(looking-at "\^m")
(forward-char 1))
(beginning-of-line))
(defun etags-list-tags (file)
......
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