diff options
| -rw-r--r-- | lisp/progmodes/etags.el | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el index 6fc6f899e49..fe7367e9639 100644 --- a/lisp/progmodes/etags.el +++ b/lisp/progmodes/etags.el | |||
| @@ -975,6 +975,11 @@ See documentation of variable `tags-file-name'." | |||
| 975 | (re-search-forward pat nil t) | 975 | (re-search-forward pat nil t) |
| 976 | (error "`%s' not found in %s; time to rerun etags" | 976 | (error "`%s' not found in %s; time to rerun etags" |
| 977 | pat buffer-file-name))) | 977 | pat buffer-file-name))) |
| 978 | ;; Position point at the right place | ||
| 979 | ;; if the search string matched an extra Ctrl-m at the beginning. | ||
| 980 | (and (eq selective-display t) | ||
| 981 | (looking-at "\^m") | ||
| 982 | (forward-char 1)) | ||
| 978 | (beginning-of-line)) | 983 | (beginning-of-line)) |
| 979 | 984 | ||
| 980 | (defun etags-list-tags (file) | 985 | (defun etags-list-tags (file) |