Mercurial > emacs

changeset 28967:05c01c4206d8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Info-fontify-node): Add intangible property as well as invisible.
author Dave Love <fx@gnu.org>
date Thu, 18 May 2000 13:07:26 +0000
parents 4005c645c1cf
children e6327d3d1115
files lisp/info.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/info.el	Thu May 18 12:19:41 2000 +0000
+++ b/lisp/info.el	Thu May 18 13:07:26 2000 +0000
@@ -2298,8 +2298,8 @@
 	;; 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