From 3d0e0d9e77ac59725cffe89fdef9388bde39888c Mon Sep 17 00:00:00 2001 From: Robert Weiner Date: Wed, 19 Aug 2020 15:28:32 +0200 Subject: [PATCH] Make etags-list-tags work with Exuberant ctags * lisp/progmodes/etags.el (etags-list-tags): Make the function work with Exuberant ctags (bug#23400). --- lisp/progmodes/etags.el | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el index edadbbdafc1..2c5c36504a9 100644 --- a/lisp/progmodes/etags.el +++ b/lisp/progmodes/etags.el @@ -1424,6 +1424,10 @@ hits the start of file." (goto-func goto-tag-location-function) tag tag-info pt) (forward-line 1) + ;; Exuberant ctags add a line starting with the DEL character; + ;; skip past it. + (when (looking-at "\177") + (forward-line 1)) (while (not (or (eobp) (looking-at "\f"))) ;; We used to use explicit tags when available, but the current goto-func ;; can only handle implicit tags. -- 2.39.2