Merge unicode branch

[gnu-emacs] / lisp / info.el

diff --git a/lisp/info.el b/lisp/info.el
index c546979327d94802e5893cadf93c2d98342dc2c2..91305ee025b872b5de21f3004605e02eff224c06 100644 (file)
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -3744,7 +3744,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