masscollaborationlabs/emacs
2
0
Fork 0
mirror of https://github.com/masscollaborationlabs/emacs.git synced 2025-07-04 11:23:24 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

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
No known key found for this signature in database
GPG key ID: 56E19BC57664A442
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)))