Fix quoted functions semantic alignment

Fixes an error where quoted functions would not align correctly with
semantic indentation. Adds an example to the test sample.

Author: rschmukler

clojure-ts-mode.el

@@ -520,6 +520,10 @@ with the markdown_inline grammar."
   "Return non-nil if NODE is a Clojure keyword."
   (string-equal "kwd_lit" (treesit-node-type node)))
 
+(defun clojure-ts--quoted-var-node-p (node)
+  "Return non-nil if NODE is a Clojure quoted."
+  (string-equal "var_quoting_lit" (treesit-node-type node)))
+
 (defun clojure-ts--named-node-text (node)
   "Gets the name of a symbol or keyword NODE.
 This does not include the NODE's namespace."
@@ -722,7 +726,8 @@ https://github.com/weavejester/cljfmt/blob/fb26b22f569724b05c93eb2502592dfc2de89
        (not (treesit-node-eq (treesit-node-child parent 1 t) node))
        (let ((first-child (treesit-node-child parent 0 t)))
          (or (clojure-ts--symbol-node-p first-child)
-             (clojure-ts--keyword-node-p first-child)))))
+             (clojure-ts--keyword-node-p first-child)
+             (clojure-ts--quoted-var-node-p first-child)))))
 
 (defun clojure-ts--match-expression-in-body (_node parent _bol)
   "Match NODE if it is an expression used in a body argument.

test/samples/indentation.clj

@@ -60,6 +60,8 @@
 (clojure.core/filter even?
                      (range 1 10))
 
+(#'filter even?
+          (range 10))
 
 (filter
  even?