# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 978697314 0
# Node ID 8f1a06c86ec859a06278a75399f822f3150ee7ea
# Parent  5b3800ddebf09b6305db17bf082d22c6599c908c
(Info-fontify-node): Mark one more char as intangible.

diff -r 5b3800ddebf0 -r 8f1a06c86ec8 lisp/info.el
--- a/lisp/info.el	Fri Jan 05 11:27:09 2001 +0000
+++ b/lisp/info.el	Fri Jan 05 12:21:54 2001 +0000
@@ -2510,9 +2510,11 @@
 	;; This is a serious problem for trying to handle multiple
 	;; frame types at once.  We want this text to be invisible
 	;; on frames that can display the font above.
-	(if (memq (framep (selected-frame)) '(x pc w32 mac))
-	    (add-text-properties (match-end 1) (match-end 2)
-				 '(invisible t intangible t))))
+	(when (memq (framep (selected-frame)) '(x pc w32 mac))
+	  (add-text-properties (match-end 1) (match-end 2)
+			       '(invisible t intangible t))
+	  (add-text-properties (1- (match-end 1)) (match-end 2)
+			       '(intangible t))))
       (goto-char (point-min))
       (while (re-search-forward "\\*Note[ \n\t]+\\([^:]*\\):" nil t)
 	(if (= (char-after (1- (match-beginning 0))) ?\") ; hack