fix: check blocks ids when inserting only if it's not the move op

pull/5578/head
Tienson Qin 2022-06-06 22:34:14 +08:00
parent 30d3b6183d
commit 28dfe9759a
1 changed files with 2 additions and 1 deletions

View File

@ -479,7 +479,8 @@
next (if sibling? next (if sibling?
(tree/-get-right target-node) (tree/-get-right target-node)
(tree/-get-down target-node)) (tree/-get-down target-node))
next-tx (when (and next (not (contains? (set (map :db/id blocks)) (:db/id (:data next))))) next-tx (when (and next
(if move? (not (contains? (set (map :db/id blocks)) (:db/id (:data next)))) true))
(when-let [left (last (filter (fn [b] (= 1 (:block/level b))) tx))] (when-let [left (last (filter (fn [b] (= 1 (:block/level b))) tx))]
[{:block/uuid (tree/-get-id next) [{:block/uuid (tree/-get-id next)
:block/left (:db/id left)}])) :block/left (:db/id left)}]))