fix: delete the parent doesn't delete its children in the db

This commit is contained in:
Tienson Qin
2021-05-01 21:51:38 +08:00
parent 38c0e15a8b
commit 7e0d4b23bb
4 changed files with 17 additions and 8 deletions

View File

@@ -705,10 +705,12 @@
blocks (reorder-blocks blocks)]
(let [start-node (outliner-core/block (first blocks))
end-node (get-top-level-end-node blocks)]
(when (outliner-core/delete-nodes start-node end-node lookup-refs)
(let [opts {:key :block/change
:data blocks}]
(db/refresh! repo opts)))))))
(if (= start-node end-node)
(delete-block-aux! (first blocks) false)
(when (outliner-core/delete-nodes start-node end-node lookup-refs)
(let [opts {:key :block/change
:data blocks}]
(db/refresh! repo opts))))))))
(defn- block-property-aux!
[block-id key value]