diff lisp/info.el @ 66670:d5afffbc0c96

(Info-fontify-node): Don't display extra "see" if there already is one here.
author Richard M. Stallman <rms@gnu.org>
date Thu, 03 Nov 2005 21:38:35 +0000
parents a39846866a71
children ff5bc4e6c882
line wrap: on
line diff
--- 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