procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix treesit-node-top-level (bug#63374)

Browse source 
* lisp/treesit.el (treesit-node-top-level): Fix the use of
rx-to-string.
This commit is contained in:
Yuan Fu 2023-05-08 12:58:19 -07:00
parent 0e4cc6a8bf
commit b625ccff87
No known key found for this signature in database
GPG key ID: 56E19BC57664A442
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/treesit.el
View file

@ -252,7 +252,7 @@ and more. See `treesit-thing-settings' for details.
If INCLUDE-NODE is non-nil, return NODE if it satisfies PRED."
(let ((pred (or pred (rx-to-string
`(bos ,(treesit-node-type node) eos))))
`(seq bos ,(treesit-node-type node) eos))))
(result nil))
(cl-loop for cursor = (if include-node node
(treesit-node-parent node))