Mercurial > emacs
changeset 3702:5bcb8bd982d0
(etags-tags-completion-table): When skipping the noise
before the tag name, let it end with any char not allowed in a tag.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 12 Jun 1993 23:43:57 +0000 |
| parents | c7f7ef5da2f8 |
| children | 6930e8f81c88 |
| files | lisp/progmodes/etags.el |
| diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/etags.el Sat Jun 12 23:27:32 1993 +0000 +++ b/lisp/progmodes/etags.el Sat Jun 12 23:43:57 1993 +0000 @@ -915,7 +915,8 @@ ;; \6 is not interesting; ;; \7 is the explicitly-specified tag name. (while (re-search-forward - "^\\(\\(.+[ \t]+\\)?\\([-a-zA-Z0-9_$]+\\)[^-a-zA-Z0-9_$]*\\)\177\ + "^\\(\\(.+[^-a-zA-Z0-9_$]+\\)?\\([-a-zA-Z0-9_$]+\\)\ +\[^-a-zA-Z0-9_$]*\\)\177\ \\([0-9]+\\),\\([0-9]+\\)\\(,\001\\([^\n]+\\)\\)?\n" nil t) (intern (if (match-beginning 6)