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 | da3b3a78154dd7d6e30e94f800dcd7382aa253c2 (patch) | |
| tree | 0e8e83265e14a42b1ed185428210c593a3032470 | |
| parent | 1b4c60e2fa92e23c387dfd2115e608d123674160 (diff) | |
| download | emacs-da3b3a78154dd7d6e30e94f800dcd7382aa253c2.tar.gz | |
(etags-list-tags): When there is an explicit tag name, skip the \177 before
it.
| -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))) |