mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-20 18:17:20 +00:00
Code Issues Releases Activity

(Info-fontify-node): Hide \n------- rather than -------\n.

Browse Source
This commit is contained in:
Stefan Monnier 2003-05-28 22:53:08 +00:00
parent 9b5e7a5ca9
commit 75a756f147
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/info.el
View File

@ -2856,7 +2856,7 @@ the variable `Info-file-list-for-emacs'."
;; frame types at once. We want this text to be invisible
;; on frames that can display the font above.
(when (memq (framep (selected-frame)) '(x pc w32 mac))
(add-text-properties (match-beginning 2) (1+ (match-end 2))
(add-text-properties (1- (match-beginning 2)) (match-end 2)
'(invisible t))))
(goto-char (point-min))
(while (re-search-forward "\\(\\*Note[ \t]*\\)\n?[ \t]*\\([^:]*\\)\\(:[^.,:(]*\\(([^)]*)[^.,:]*\\)?[,:]?\n?\\)" nil t)