fix: non-consecutive blocks move

pull/5697/head
Tienson Qin 2022-06-14 15:44:39 +08:00
parent 6cd7b1a5a5
commit 3e0c4ba3d8
1 changed files with 3 additions and 1 deletions

View File

@ -515,7 +515,9 @@
top-level-blocks-ids (set (map :db/id top-level-blocks))
right-block (get-right-sibling (:db/id (last top-level-blocks)))]
(when (and right-block
(not (contains? top-level-blocks-ids (:db/id right-block))))
(not (contains? top-level-blocks-ids (:db/id right-block)))
(not= (:db/id (last top-level-blocks))
(:db/id (:block/left right-block))))
{:db/id (:db/id right-block)
:block/left (loop [block (:block/left right-block)]
(if (contains? top-level-blocks-ids (:db/id block))