diff options
| author | Yuan Fu <casouri@gmail.com> | 2022-11-20 16:56:33 -0800 |
|---|---|---|
| committer | Yuan Fu <casouri@gmail.com> | 2022-11-20 17:04:58 -0800 |
| commit | 32870d2f207536bb7932beeb2e0ec9a4e0146560 (patch) | |
| tree | 7178d8a11d9b575306118a3fddbcd39e284bb359 /lisp/progmodes/java-ts-mode.el | |
| parent | 625ea08652053617034bf8ceee0d6cfae34f2dcc (diff) | |
| download | emacs-32870d2f207536bb7932beeb2e0ec9a4e0146560.tar.gz emacs-32870d2f207536bb7932beeb2e0ec9a4e0146560.tar.bz2 emacs-32870d2f207536bb7932beeb2e0ec9a4e0146560.zip | |
Limit recursion level for tree-sitter imenu functions
Generating imenu index doesn't require going down to the bottom of the
tree (defun's are usually top-level). Add limit so we don't go too
far down on very large buffers.
* lisp/progmodes/c-ts-mode.el (c-ts-mode--imenu)
* lisp/progmodes/java-ts-mode.el (java-ts-mode--imenu)
* lisp/progmodes/js.el (js--treesit-imenu)
* lisp/progmodes/json-ts-mode.el (json-ts-mode--imenu)
* lisp/progmodes/python.el (python-imenu-treesit-create-index)
* lisp/textmodes/css-mode.el (css--treesit-imenu): Add limit to
treesit-induce-sparse-tree.
Diffstat (limited to 'lisp/progmodes/java-ts-mode.el')
| -rw-r--r-- | lisp/progmodes/java-ts-mode.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/progmodes/java-ts-mode.el b/lisp/progmodes/java-ts-mode.el index 6a800d292c8..62962b7293b 100644 --- a/lisp/progmodes/java-ts-mode.el +++ b/lisp/progmodes/java-ts-mode.el @@ -246,23 +246,23 @@ the subtrees." (class-tree `("Class" . ,(java-ts-mode--imenu-1 (treesit-induce-sparse-tree - node "^class_declaration$")))) + node "^class_declaration$" nil 1000)))) (interface-tree `("Interface" . ,(java-ts-mode--imenu-1 (treesit-induce-sparse-tree - node "^interface_declaration$")))) + node "^interface_declaration$" nil 1000)))) (enum-tree `("Enum" . ,(java-ts-mode--imenu-1 (treesit-induce-sparse-tree - node "^enum_declaration$")))) + node "^enum_declaration$" nil 1000)))) (record-tree `("Record" . ,(java-ts-mode--imenu-1 (treesit-induce-sparse-tree - node "^record_declaration$")))) + node "^record_declaration$" nil 1000)))) (method-tree `("Method" . ,(java-ts-mode--imenu-1 (treesit-induce-sparse-tree - node "^method_declaration$"))))) + node "^method_declaration$" nil 1000))))) (cl-remove-if #'null `(,(when (cdr class-tree) class-tree) |