martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Don't signal an error in treesit-node-at

Browse Source 
* lisp/treesit.el (treesit-node-at): Wrap
treesit-buffer-root-node within condition-case.
This commit is contained in:
Yuan Fu
2025-01-20 20:36:41 -08:00
parent 5d021a711a
commit a9cde2463a
1 changed files with 5 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
lisp/treesit.el
View File

@@ -213,9 +213,11 @@ language and doesn't match the language of the local parser."
(car (treesit-local-parsers-at (car (treesit-local-parsers-at
pos parser-or-lang)))) pos parser-or-lang))))
(treesit-parser-root-node parser)) (treesit-parser-root-node parser))
(treesit-buffer-root-node (condition-case nil
(or parser-or-lang (treesit-buffer-root-node
(treesit-language-at pos)))))) (or parser-or-lang
(treesit-language-at pos)))
(treesit-no-parser nil)))))
(node root) (node root)
(node-before root) (node-before root)
(pos-1 (max (1- pos) (point-min))) (pos-1 (max (1- pos) (point-min)))