# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 849991120 0
# Node ID b24b7ef8573b4b3b8aea29e2393bf82ff8844b8c
# Parent  cd1a0e1e6975bde88a35e34bad54eff6a7516ff6
(etags-file-of-tag): Expand the file name
using the truename of default-directory.

diff -r cd1a0e1e6975 -r b24b7ef8573b lisp/progmodes/etags.el
--- a/lisp/progmodes/etags.el	Sat Dec 07 20:36:21 1996 +0000
+++ b/lisp/progmodes/etags.el	Sat Dec 07 20:38:40 1996 +0000
@@ -1001,7 +1001,8 @@
 (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 ()