diff options
Diffstat (limited to 'lisp/info.el')
| -rw-r--r-- | lisp/info.el | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lisp/info.el b/lisp/info.el index 21e32e76a4..39f4c5df64 100644 --- a/lisp/info.el +++ b/lisp/info.el @@ -2510,9 +2510,11 @@ the variable `Info-file-list-for-emacs'." ;; 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 |