diff options
| -rw-r--r-- | lisp/progmodes/etags.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el index 1817f6f1ae6..0f93051ee69 100644 --- a/lisp/progmodes/etags.el +++ b/lisp/progmodes/etags.el | |||
| @@ -1,6 +1,6 @@ | |||
| 1 | ;;; etags.el --- etags facility for Emacs | 1 | ;;; etags.el --- etags facility for Emacs |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 1985, 1986, 1988, 1989, 1992, 1993, 1994 | 3 | ;; Copyright (C) 1985, 1986, 1988, 1989, 1992, 1993, 1994, 1995 |
| 4 | ;; Free Software Foundation, Inc. | 4 | ;; Free Software Foundation, Inc. |
| 5 | 5 | ||
| 6 | ;; Author: Roland McGrath <roland@gnu.ai.mit.edu> | 6 | ;; Author: Roland McGrath <roland@gnu.ai.mit.edu> |
| @@ -998,8 +998,8 @@ See documentation of variable `tags-file-name'." | |||
| 998 | ;; \6 is the line to start searching at; | 998 | ;; \6 is the line to start searching at; |
| 999 | ;; \7 is the char to start searching at. | 999 | ;; \7 is the char to start searching at. |
| 1000 | (while (re-search-forward | 1000 | (while (re-search-forward |
| 1001 | "^\\(\\(.+[^-a-zA-Z0-9_$]+\\)?\\([-a-zA-Z0-9_$?:]+\\)\ | 1001 | "^\\(\\([^\177]+[^-a-zA-Z0-9_$\177]+\\)?\\([-a-zA-Z0-9_$?:]+\\)\ |
| 1002 | \[^-a-zA-Z0-9_$?:]*\\)\177\\(\\([^\n\001]+\\)\001\\)?\ | 1002 | \[^-a-zA-Z0-9_$?:\177]*\\)\177\\(\\([^\n\001]+\\)\001\\)?\ |
| 1003 | \\([0-9]+\\)?,\\([0-9]+\\)?\n" | 1003 | \\([0-9]+\\)?,\\([0-9]+\\)?\n" |
| 1004 | nil t) | 1004 | nil t) |
| 1005 | (intern (if (match-beginning 5) | 1005 | (intern (if (match-beginning 5) |