allow set starting block if it's exists

This commit is contained in:
Mega Yu
2023-07-20 16:10:08 +08:00
committed by Tienson Qin
parent 805efabb22
commit cba1150e1a

View File

@@ -991,8 +991,7 @@ Similar to re-frame subscriptions"
(defn set-selection-start-block!
[start-block]
(when-not (get-selection-start-block)
(swap! state assoc :selection/start-block start-block)))
(swap! state assoc :selection/start-block start-block))
(defn set-selection-blocks!
([blocks]