diff options
author | Roland McGrath <roland@gnu.org> | 1996-06-08 14:24:21 +0000 |
---|---|---|
committer | Roland McGrath <roland@gnu.org> | 1996-06-08 14:24:21 +0000 |
commit | ae4535b6e965cf564e56f069f91e33d4ccb0de51 (patch) | |
tree | 3547061de57f0a27a88ae957aa8fbc8324793618 /lisp | |
parent | 9b9ab1c1285db05de4596d0cea1803ad16361487 (diff) | |
download | emacs-ae4535b6e965cf564e56f069f91e33d4ccb0de51.tar.gz |
(etags-list-tags): When there is an explicit tag name, skip the \177 before
it.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/progmodes/etags.el | 2 |
1 files changed, 1 insertions, 1 deletions
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))) |