From: Stefan Monnier Date: Wed, 28 May 2003 22:53:08 +0000 (+0000) Subject: (Info-fontify-node): Hide \n------- rather than -------\n. X-Git-Tag: ttn-vms-21-2-B4~9877 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=75a756f1471f181a1226f05eeea50a206eae5a70;p=emacs.git (Info-fontify-node): Hide \n------- rather than -------\n. --- diff --git a/lisp/info.el b/lisp/info.el index 5e895f250d6..5ccd46dad58 100644 --- a/lisp/info.el +++ b/lisp/info.el @@ -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)