aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/info.el3
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/info.el b/lisp/info.el
index b2a67265dca..6d966da3317 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -145,7 +145,7 @@ The Lisp code is executed when the node is selected.")
145 :type 'boolean 145 :type 'boolean
146 :group 'info) 146 :group 'info)
147 147
148(defcustom Info-fontify-maximum-menu-size 100000 148(defcustom Info-fontify-maximum-menu-size 1000000
149 "*Maximum size of menu to fontify if `font-lock-mode' is non-nil." 149 "*Maximum size of menu to fontify if `font-lock-mode' is non-nil."
150 :type 'integer 150 :type 'integer
151 :group 'info) 151 :group 'info)
@@ -3939,7 +3939,6 @@ the variable `Info-file-list-for-emacs'."
3939 (goto-char (point-min)) 3939 (goto-char (point-min))
3940 (when (and (or not-fontified-p fontify-visited-p) 3940 (when (and (or not-fontified-p fontify-visited-p)
3941 (search-forward "\n* Menu:" nil t) 3941 (search-forward "\n* Menu:" nil t)
3942 (not (Info-index-node))
3943 ;; Don't take time to annotate huge menus 3942 ;; Don't take time to annotate huge menus
3944 (< (- (point-max) (point)) Info-fontify-maximum-menu-size)) 3943 (< (- (point-max) (point)) Info-fontify-maximum-menu-size))
3945 (let ((n 0) 3944 (let ((n 0)