diff options
Diffstat (limited to 'lisp/info-look.el')
| -rw-r--r-- | lisp/info-look.el | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/lisp/info-look.el b/lisp/info-look.el index 828fd3e6118..a4280e97c99 100644 --- a/lisp/info-look.el +++ b/lisp/info-look.el @@ -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) |