Mercurial > emacs
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