aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorChong Yidong2006-12-22 19:49:08 +0000
committerChong Yidong2006-12-22 19:49:08 +0000
commit195256fee1f2e23d00e180b4e12825e8d73dc4a8 (patch)
tree1e9c83c466a591abda18e094db650c85747b794d
parent13a87fcec732facb147c03cbbfe5d442709e3cb2 (diff)
downloademacs-195256fee1f2e23d00e180b4e12825e8d73dc4a8.tar.gz
emacs-195256fee1f2e23d00e180b4e12825e8d73dc4a8.zip
(Info-fontify-maximum-menu-size): Bump to 1000000.
(Info-fontify-node): Do fontify indices.
-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)