Fix tree-sitter indent preset prev-adaptive-prefix

* lisp/treesit.el (treesit-simple-indent-presets): Use looking-at so the
call to match-string has the match data to work with.

(cherry picked from commit c70bd0e3fe9c2f5b1fcdce7939c07449f8a5ec4c)

diff --git a/lisp/treesit.el b/lisp/treesit.el
index 2d52edb306a42b2bbd062530ea0f219132b733e0..a16f7deab60dcda17c154570a5021469b119c9cb 100644 (file)
--- a/lisp/treesit.el
+++ b/lisp/treesit.el
@@ -1636,7 +1636,7 @@ See `treesit-simple-indent-presets'.")
 
                     (goto-char bol)
                     (setq this-line-has-prefix
-                          (and (looking-at-p adaptive-fill-regexp)
+                          (and (looking-at adaptive-fill-regexp)
                                (not (string-match-p
                                      (rx bos (* whitespace) eos)
                                      (match-string 0)))))