mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-04 11:40:22 +00:00
Code Issues Releases Activity

(Info-fontify-node): Check if already fontified or not

Browse Source 
by next-single-property-change.
This commit is contained in:
Kenichi Handa 2006-03-14 12:14:57 +00:00
parent cac8ad63b4
commit 499878f86c
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/info.el
View File

@ -3675,7 +3675,8 @@ the variable `Info-file-list-for-emacs'."
(case-fold-search t)
paragraph-markers
(not-fontified-p ; the node hasn't already been fontified
(not (let ((where (next-property-change (point-min))))
(not (let ((where (next-single-property-change (point-min)
'font-lock-face)))
(and where (not (= where (point-max)))))))
(fontify-visited-p ; visited nodes need to be re-fontified
(and Info-fontify-visited-nodes