# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 844037903 0
# Node ID 168e1370e8870e3d87cb60fd4df31216beb5f4f4
# Parent  ed13d19dbce56dda05478934513a2320951b095f
(etags-file-of-tag): Fix looking-at regexp.

diff -r ed13d19dbce5 -r 168e1370e887 lisp/progmodes/etags.el
--- a/lisp/progmodes/etags.el	Sun Sep 29 22:45:55 1996 +0000
+++ b/lisp/progmodes/etags.el	Sun Sep 29 22:58:23 1996 +0000
@@ -1000,9 +1000,7 @@
 
 (defun etags-file-of-tag ()
   (save-excursion
-    (if (looking-at "./")
-        (re-search-forward "\\([^\n]+\\),[0-9]*\n")
-      (re-search-backward "\f\n\\([^\n]+\\),[0-9]*\n"))
+    (re-search-backward "\f\n\\([^\n]+\\),[0-9]*\n")
     (buffer-substring (match-beginning 1) (match-end 1))))