]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix treesit-range-rules
authorYuan Fu <casouri@gmail.com>
Sun, 28 Jan 2024 06:03:28 +0000 (22:03 -0800)
committerEshel Yaron <me@eshelyaron.com>
Wed, 31 Jan 2024 20:10:34 +0000 (21:10 +0100)
* lisp/treesit.el (treesit-range-rules): Reset :local like other
keywords.  The other chunk is indentation fix.

(cherry picked from commit 236317e5d2284399d6ca0413ea2a29b84270d545)

lisp/treesit.el

index d1e0beaaac9d1c03b39a3a0dd4779af6d08e027d..96222ed81cbdda4b2d3a5138ab52ff88cd3d6cf8 100644 (file)
@@ -595,8 +595,8 @@ that encompasses the region between START and END."
                    (unless (and (consp range-offset)
                                 (numberp (car range-offset))
                                 (numberp (cdr range-offset)))
-                    (signal 'treesit-error (list "Value of :offset option should be a pair of numbers" range-offset)))
-                  (setq offset range-offset)))
+                     (signal 'treesit-error (list "Value of :offset option should be a pair of numbers" range-offset)))
+                   (setq offset range-offset)))
         (query (if (functionp query)
                    (push (list query nil nil) result)
                  (when (null embed)
@@ -606,7 +606,7 @@ that encompasses the region between START and END."
                  (push (list (treesit-query-compile host query)
                              embed local offset)
                        result))
-               (setq host nil embed nil offset nil))))
+               (setq host nil embed nil offset nil local nil))))
     (nreverse result)))
 
 (defun treesit--merge-ranges (old-ranges new-ranges start end)