Fix the call to treesit-thing-defined-p

* lisp/treesit.el (treesit-defun-at-point): Add the necessary
2nd argument.

(cherry picked from commit 1551c306f30cc139b321056c03206df4b71eae5c)

diff --git a/lisp/treesit.el b/lisp/treesit.el
index 91efdb30f31571896f1dc096fed8c3bddc3d17d6..55b6349139d07ccfaf9b6625d4d05f80c59fd283 100644 (file)
--- a/lisp/treesit.el
+++ b/lisp/treesit.el
@@ -2826,7 +2826,9 @@ is `nested'.
 
 Return nil if `treesit-defun-type-regexp' isn't set and `defun'
 isn't defined in `treesit-thing-settings'."
-  (when (or treesit-defun-type-regexp (treesit-thing-defined-p 'defun))
+  (when (or treesit-defun-type-regexp
+            (treesit-thing-defined-p
+             'defun (treesit-language-at (point))))
     (treesit-thing-at-point
      (or treesit-defun-type-regexp 'defun) treesit-defun-tactic)))