Mercurial > emacs
diff lisp/info.el @ 51310:a8358d5d67b3
(Info-fontify-node): Hide \n------- rather than -------\n.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Wed, 28 May 2003 22:53:08 +0000 |
parents | 956ab3f2a864 |
children | 4c85e6a5a9d2 |
line wrap: on
line diff
--- a/lisp/info.el Wed May 28 21:09:45 2003 +0000 +++ b/lisp/info.el Wed May 28 22:53:08 2003 +0000 @@ -2856,7 +2856,7 @@ ;; 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)