refactor: db migrate

This commit is contained in:
Tienson Qin
2021-03-15 09:50:06 +08:00
parent d29b265e28
commit 15dd3c46a7
11 changed files with 69 additions and 81 deletions

View File

@@ -321,10 +321,8 @@
done
(conj done (:db/id current))))
[] old-ref-blocks)]
;; removes retracted pages and blocks
(into
(mapv (fn [ref] [:db/retract eid :block/ref-pages ref]) retracted-pages)
(mapv (fn [ref] [:db/retract eid :block/ref-blocks ref]) retracted-blocks))))
;; removes refs
(mapv (fn [ref] [:db/retract eid :block/refs ref]) retracted-pages)))
(defn- block-with-title
[content format]