GNU bug report logs - #60251
29.0.60; Consider the language at point for tree sitter treesit-inspect-node-at-point

Previous Next

Package: emacs;

Reported by: Wilhelm H Kirschbaum <wilhelm <at> floatpays.co.za>

Date: Thu, 22 Dec 2022 08:57:02 UTC

Severity: normal

Found in version 29.0.60

Full log


View this message in rfc822 format

From: Stefan Kangas <stefankangas <at> gmail.com>
To: Wilhelm H Kirschbaum <wilhelm <at> floatpays.co.za>
Cc: Yuan Fu <casouri <at> gmail.com>, 60251 <at> debbugs.gnu.org
Subject: bug#60251: 29.0.60; Consider the language at point for tree sitter treesit-inspect-node-at-point
Date: Tue, 5 Sep 2023 16:32:12 -0700
Wilhelm H Kirschbaum <wilhelm <at> floatpays.co.za> writes:

> The following change will make it possible to inspect a node when using
> an embedded language, otherwise it will assume the first specified
> language without allowing specifying the language. This assumes that
> treesit-language-at-point-function has been correctly set. diff --git

Yuan, do you have any comments on the below patch?  Thanks in advance.

> a/lisp/treesit.el b/lisp/treesit.el
> index 6407669118..74dfd26776 100644
> --- a/lisp/treesit.el
> +++ b/lisp/treesit.el
> @@ -1931,7 +1931,7 @@ treesit-inspect-node-at-point
>   (interactive "p")
>   ;; NODE-LIST contains all the node that starts at point.
>   (let* ((node-list
> -          (cl-loop for node = (treesit-node-at (point))
> +          (cl-loop for node = (treesit-node-at (point) (treesit-language-at
> (point)))
>                    then (treesit-node-parent node)
>                    while node
>                    if (eq (treesit-node-start node)
>
>
> Another option might be to allow parser-or-lang as an argument, but
> thinking that as an interactive function for debugging the above might
> be more useful, but either way it does not seem possible to
> inspect-node-at-point for multiple language configuration.
>
> Regards,
> Wilhelm




This bug report was last modified 1 year and 338 days ago.

Previous Next


GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.