From da3b3a78154dd7d6e30e94f800dcd7382aa253c2 Mon Sep 17 00:00:00 2001 From: Roland McGrath Date: Sat, 8 Jun 1996 14:24:21 +0000 Subject: [PATCH] (etags-list-tags): When there is an explicit tag name, skip the \177 before it. --- lisp/progmodes/etags.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el index 8954b1364b6..0afff9a9374 100644 --- a/lisp/progmodes/etags.el +++ b/lisp/progmodes/etags.el @@ -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))) -- 2.39.2