# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1131053915 0
# Node ID d5afffbc0c96e9dc6f60e1a96192f16ee1bde6e6
# Parent  550c8e306cb514e57e800fb36a9ac5bf26e92470
(Info-fontify-node): Don't display extra "see" if there already is one here.

diff -r 550c8e306cb5 -r d5afffbc0c96 lisp/info.el
--- a/lisp/info.el	Thu Nov 03 21:37:21 2005 +0000
+++ b/lisp/info.el	Thu Nov 03 21:38:35 2005 +0000
@@ -3757,7 +3757,9 @@
 		    ;; an end of sentence
 		    (skip-syntax-backward " ("))
                   (setq other-tag
-                        (cond ((memq (char-before) '(nil ?\. ?! ??))
+			(cond ((save-match-data (looking-back "\\<see"))
+			       "")
+			      ((memq (char-before) '(nil ?\. ?! ??))
                                "See ")
 			      ((save-match-data
 				 (save-excursion