# HG changeset patch
# User Erik Naggum <erik@naggum.no>
# Date 838161168 0
# Node ID 2f589e0f2c7a439a330c1fa0ba6f0b62ad0d3202
# Parent  e3cfe2afed1723c270f2edc2036d14833aa3bd8f
(tag-exact-file-name-match-p): Fix previous change.

diff -r e3cfe2afed17 -r 2f589e0f2c7a lisp/progmodes/etags.el
--- a/lisp/progmodes/etags.el	Tue Jul 23 20:01:33 1996 +0000
+++ b/lisp/progmodes/etags.el	Tue Jul 23 22:32:48 1996 +0000
@@ -1240,7 +1240,7 @@
 
 (defun tag-exact-file-name-match-p (tag)
   (and (looking-at ",")
-       (save-excursion (backward-char (length tag)))
+       (save-excursion (backward-char (length tag))
 		       (looking-at "\f\n"))))
 
 ;; t if point is in a tag line with a tag containing TAG as a substring.