From: Yuan Fu <casouri@gmail.com>
Date: Mon, 11 Dec 2023 01:40:39 +0000 (-0800)
Subject: Fix treesit-default-defun-skipper (bug#66711)
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d2c4b926ac2;p=emacs.git

Fix treesit-default-defun-skipper (bug#66711)

* lisp/treesit.el:
(treesit-default-defun-skipper): Add bol to the rx pattern.
---

diff --git a/lisp/treesit.el b/lisp/treesit.el
index 9dc5d4970b6..8a07f5023a9 100644
--- a/lisp/treesit.el
+++ b/lisp/treesit.el
@@ -1962,7 +1962,7 @@ the current line if the beginning of the defun is indented."
          (forward-line 1))
         ;; Moving backward, but there are some whitespace (and only
         ;; whitespace) between point and BOL: go back to BOL.
-        ((looking-back (rx (+ (or " " "\t")))
+        ((looking-back (rx bol (+ (or " " "\t")))
                        (line-beginning-position))
          (beginning-of-line))))