(etags-file-of-tag): Expand the file name
using the truename of default-directory.
This commit is contained in:
parent
3183b23074
commit
e196e7f212
1 changed files with 2 additions and 1 deletions
|
@ -1001,7 +1001,8 @@ See documentation of variable `tags-file-name'."
|
|||
(defun etags-file-of-tag ()
|
||||
(save-excursion
|
||||
(re-search-backward "\f\n\\([^\n]+\\),[0-9]*\n")
|
||||
(buffer-substring (match-beginning 1) (match-end 1))))
|
||||
(expand-file-name (buffer-substring (match-beginning 1) (match-end 1))
|
||||
(file-truename default-directory))))
|
||||
|
||||
|
||||
(defun etags-tags-completion-table ()
|
||||
|
|
Loading…
Add table
Reference in a new issue