emacs-29 86a3462e3d: (treesit-simple-indent-presets): Do that for 'or' as well.

[Dmitry Gutov]

branch: emacs-29
commit 86a3462e3d286d4d39337ad450987bbba9415f16
Author: Dmitry Gutov <dgutov@yandex.ru>
Commit: Dmitry Gutov <dgutov@yandex.ru>

    (treesit-simple-indent-presets): Do that for 'or' as well.
    
    * lisp/treesit.el
    (treesit-simple-indent-presets): Do that for 'or' as well.
---
 lisp/treesit.el | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/lisp/treesit.el b/lisp/treesit.el
index 11a78bddcd..7205e43916 100644
--- a/lisp/treesit.el
+++ b/lisp/treesit.el
@@ -1187,9 +1187,12 @@ See `treesit-simple-indent-presets'.")
                          res))))
         (cons 'or (lambda (&rest fns)
                     (lambda (node parent bol &rest _)
-                      (seq-find
-                       (lambda (fn) (funcall fn node parent bol))
-                       fns))))
+                      (let (res)
+                        (catch 'break
+                          (dolist (fn fns)
+                            (setq res (funcall fn node parent bol))
+                            (and res (throw 'break t))))
+                        res))))
         (cons 'not (lambda (fn)
                      (lambda (node parent bol &rest _)
                        (not (funcall fn node parent bol)))))