diff options
| author | Dmitry Gutov | 2015-09-07 01:38:10 +0300 |
|---|---|---|
| committer | Dmitry Gutov | 2015-09-07 01:39:09 +0300 |
| commit | 770db45d6769134aa3a853e2ff38089a1e8a3327 (patch) | |
| tree | 7caa75a4ab9c2a9219e14515ded66b142aae8d52 | |
| parent | a6dcaea88f13d8f4ba5129510d3ae721ae7b4442 (diff) | |
| download | emacs-770db45d6769134aa3a853e2ff38089a1e8a3327.tar.gz emacs-770db45d6769134aa3a853e2ff38089a1e8a3327.zip | |
Allow even one non-regular character before the implicit tag name
* lisp/progmodes/etags.el (etags-tags-completion-table):
Allow even one non-regular character before the implicit tag name.
Reported at http://emacs.stackexchange.com/questions/15269/.
| -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 d38a7cd7706..83ee2a484f7 100644 --- a/lisp/progmodes/etags.el +++ b/lisp/progmodes/etags.el | |||
| @@ -1268,7 +1268,7 @@ buffer-local values of tags table format variables." | |||
| 1268 | ;; \6 is the line to start searching at; | 1268 | ;; \6 is the line to start searching at; |
| 1269 | ;; \7 is the char to start searching at. | 1269 | ;; \7 is the char to start searching at. |
| 1270 | (while (re-search-forward | 1270 | (while (re-search-forward |
| 1271 | "^\\(\\([^\177]+[^-a-zA-Z0-9_+*$:\177]+\\)?\ | 1271 | "^\\(\\([^\177]*[^-a-zA-Z0-9_+*$:\177]+\\)?\ |
| 1272 | \\([-a-zA-Z0-9_+*$?:]+\\)[^-a-zA-Z0-9_+*$?:\177]*\\)\177\ | 1272 | \\([-a-zA-Z0-9_+*$?:]+\\)[^-a-zA-Z0-9_+*$?:\177]*\\)\177\ |
| 1273 | \\(\\([^\n\001]+\\)\001\\)?\\([0-9]+\\)?,\\([0-9]+\\)?\n" | 1273 | \\(\\([^\n\001]+\\)\001\\)?\\([0-9]+\\)?,\\([0-9]+\\)?\n" |
| 1274 | nil t) | 1274 | nil t) |