Merge remote-tracking branch 'origin/staging' into develop

This commit is contained in:
Andrey Antukh 2023-07-31 11:13:40 +02:00
commit a64cb47afb
21 changed files with 81 additions and 45 deletions

View file

@ -166,6 +166,13 @@
current
(recur (.-parentElement current) (dec current-count))))))
(defn get-parent-with-data
[^js node name]
(loop [current node]
(if (or (nil? current) (obj/in? (.-dataset current) name))
current
(recur (.-parentElement current)))))
(defn get-parent-with-selector
[^js node selector]
(loop [current node]