mirror of https://github.com/logseq/logseq
fix: delete objects
parent
620038ea0f
commit
63ac4e42c3
|
@ -832,9 +832,10 @@
|
|||
:or {children? true}}]
|
||||
[:pre [(seq blocks)]]
|
||||
(let [txs-state (ds/new-outliner-txs-state)
|
||||
blocks (get-top-level-blocks blocks)
|
||||
block-ids (map (fn [b] [:block/uuid (:block/uuid b)]) blocks)
|
||||
start-block (first blocks)
|
||||
end-block (last (get-top-level-blocks blocks))
|
||||
end-block (last blocks)
|
||||
start-node (block start-block)
|
||||
end-node (block end-block)
|
||||
end-node-parents (->>
|
||||
|
|
|
@ -31,13 +31,12 @@
|
|||
(go-loop []
|
||||
(let [[repo ret-ch deleted-uuids upsert-blocks] (<! db-upsert-chan)
|
||||
delete-rc (when (seq deleted-uuids)
|
||||
(<! (p->c (.deleteBlocks sqlite repo (clj->js deleted-uuids)))))
|
||||
(<! (p->c (.deleteBlocks sqlite repo (clj->js (map str deleted-uuids))))))
|
||||
upsert-rc (<! (p->c (.upsertBlocks sqlite repo (clj->js upsert-blocks))))]
|
||||
(async/put! ret-ch [delete-rc upsert-rc])
|
||||
(prn :db-upsert-chan :delete delete-rc :upsert upsert-rc))
|
||||
(recur))
|
||||
(prn ::done))
|
||||
)
|
||||
(prn ::done)))
|
||||
(p/catch (fn [e]
|
||||
(js/console.error "init error", e)))))))
|
||||
(p/resolved @*sqlite)))
|
||||
|
@ -123,4 +122,3 @@
|
|||
res (.fetchBlocksExcluding sqlite repo (clj->js exclude-uuids))]
|
||||
(prn :<fetch-blocks-excluding res)
|
||||
res)))
|
||||
|
||||
|
|
Loading…
Reference in New Issue