[CI] Fix compilation for Emacs-30

Author: rrudakov

clojure-ts-mode.el

@@ -1129,8 +1129,8 @@ See `clojure-ts--standard-definition-node-name' for the implementation used.")
 
 (defun clojure-ts--outline-level ()
   "Return the current level of the outline heading at point."
-  (let* ((node (treesit-outline--at-point))
-         (node-text (treesit-node-text node)))
+  (when-let* ((node (treesit-thing-at (point) #'clojure-ts--outline-predicate))
+              (node-text (treesit-node-text node)))
     (string-match ";;\\(;+\\) " node-text)
     (- (match-end 1) (match-beginning 1))))