Commit 195256fe authored by Chong Yidong's avatar Chong Yidong
Browse files

(Info-fontify-maximum-menu-size): Bump to 1000000.

(Info-fontify-node): Do fontify indices.
parent 13a87fce
......@@ -145,7 +145,7 @@ The Lisp code is executed when the node is selected.")
:type 'boolean
:group 'info)
(defcustom Info-fontify-maximum-menu-size 100000
(defcustom Info-fontify-maximum-menu-size 1000000
"*Maximum size of menu to fontify if `font-lock-mode' is non-nil."
:type 'integer
:group 'info)
......@@ -3939,7 +3939,6 @@ the variable `Info-file-list-for-emacs'."
(goto-char (point-min))
(when (and (or not-fontified-p fontify-visited-p)
(search-forward "\n* Menu:" nil t)
(not (Info-index-node))
;; Don't take time to annotate huge menus
(< (- (point-max) (point)) Info-fontify-maximum-menu-size))
(let ((n 0)
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment