1 files changed, 2 insertions, 2 deletions

diff --git a/lisp/info.el b/lisp/info.el
index a65eadb81d4..01409b7d9f2 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -2298,8 +2298,8 @@ The alist key is the character the title is underlined with (?*, ?= or ?-)."
         ;; 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))
-            (put-text-property (match-end 1) (match-end 2)
-                               'invisible t)))
+            (add-text-properties (match-end 1) (match-end 2)
+                                 'invisible t 'intangible t)))
       (goto-char (point-min))
       (while (re-search-forward "\\*Note[ \n\t]+\\([^:]*\\):" nil t)
         (if (= (char-after (1- (match-beginning 0))) ?\") ; hack