(info-lookup): Bind Info-fontify-maximum-menu-size to nil to speed up lookup

of the symbol in index nodes.
This commit is contained in:
Eli Zaretskii 2007-02-17 12:03:01 +00:00
parent 8e1ac0634a
commit e8d2103a83
2 changed files with 10 additions and 2 deletions

View file

@ -1,3 +1,8 @@
2007-02-17 Eli Zaretskii <eliz@gnu.org>
* info-look.el (info-lookup): Bind Info-fontify-maximum-menu-size
to nil to speed up lookup of the symbol in index nodes.
2007-02-17 Alin C. Soare <alinsoar@voila.fr> (tiny change)
* emacs-lisp/lisp-mode.el (calculate-lisp-indent): Added

View file

@ -353,8 +353,11 @@ If optional argument QUERY is non-nil, query for the help mode."
suffix (nth 3 (car doc-spec)))
(when (condition-case error-data
(progn
(Info-goto-node node)
(setq doc-found t))
;; Don't need Index menu fontifications here, and
;; they slow down the lookup.
(let (Info-fontify-maximum-menu-size)
(Info-goto-node node)
(setq doc-found t)))
(error
(message "Cannot access Info node %s" node)
(sit-for 1)