diff --git a/lisp/info.el b/lisp/info.el index a4cae949977..1f0d67d31c6 100644 --- a/lisp/info.el +++ b/lisp/info.el @@ -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