diff options
| -rw-r--r-- | lisp/progmodes/etags.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el index aefa78c33b1..80d56df9329 100644 --- a/lisp/progmodes/etags.el +++ b/lisp/progmodes/etags.el | |||
| @@ -1001,7 +1001,8 @@ See documentation of variable `tags-file-name'." | |||
| 1001 | (defun etags-file-of-tag () | 1001 | (defun etags-file-of-tag () |
| 1002 | (save-excursion | 1002 | (save-excursion |
| 1003 | (re-search-backward "\f\n\\([^\n]+\\),[0-9]*\n") | 1003 | (re-search-backward "\f\n\\([^\n]+\\),[0-9]*\n") |
| 1004 | (buffer-substring (match-beginning 1) (match-end 1)))) | 1004 | (expand-file-name (buffer-substring (match-beginning 1) (match-end 1)) |
| 1005 | (file-truename default-directory)))) | ||
| 1005 | 1006 | ||
| 1006 | 1007 | ||
| 1007 | (defun etags-tags-completion-table () | 1008 | (defun etags-tags-completion-table () |