; Fix my previous commit

* lisp/treesit.el (treesit--update-range-1): Actually guard
against calling treesit-query-language on a function.

(cherry picked from commit f1950fbdb49abfcea26b995b38223c1e89b3c720)

diff --git a/lisp/treesit.el b/lisp/treesit.el
index 6e08e9458f67ac4c620875185a4ff002bb451fb8..e2841d41c859dae9bd1132a34ea1da38b6945cf8 100644 (file)
--- a/lisp/treesit.el
+++ b/lisp/treesit.el
@@ -1065,7 +1065,9 @@ Function range settings in SETTINGS are ignored."
         (modified-tick (buffer-chars-modified-tick)))
     (dolist (setting settings)
       (let* ((query (nth 0 setting))
-             (query-lang (treesit-query-language query))
+             (query-lang (if (functionp query)
+                             'never
+                           (treesit-query-language query)))
              (embed-lang (nth 1 setting))
              (local (nth 2 setting))
              (offset (nth 3 setting))