fix: should update title indices after changing only `:block/origin-name`

pull/9560/head^2
situ2001 2023-06-04 00:42:22 +08:00 committed by Gabriel Horner
parent 5c9907227b
commit d20b662118
1 changed files with 4 additions and 2 deletions

View File

@ -260,12 +260,14 @@
(let [data (:tx-data tx-report)
datoms (filter
(fn [datom]
(contains? #{:block/name :block/content} (:a datom)))
(contains? #{:block/name :block/original-name :block/content} (:a datom)))
data)]
(when (seq datoms)
(let [datoms (group-by :a datoms)
blocks (:block/content datoms)
pages (:block/name datoms)]
pages (concat
(:block/name datoms)
(:block/original-name datoms))]
(merge (get-blocks-from-datoms-impl blocks)
(get-pages-from-datoms-impl pages))))))