greatbody
/
logseq
mirror of https://github.com/logseq/logseq
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

chore: prn :need-update-block? result

pull/11102/head
rcmerci 2024-03-11 14:26:35 +08:00
parent 05118ab437
commit cc86eae2a7
1 changed files with 16 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

30
src/main/frontend/worker/rtc/core.cljs
View File

@ -346,20 +346,22 @@
(let [ent (d/entity @conn [:block/uuid block-uuid])]
(worker-util/profile
::need-update-block?
(some (fn [[k v]]
(case k
:content (not= v (:block/raw-content ent))
:updated-at (not= v (:block/updated-at ent))
:created-at (not= v (:block/created-at ent))
:alias (not= (set v) (set (map :block/uuid (:block/alias ent))))
:type (not= (set v) (set (:block/type ent)))
:schema (not= (transit/read transit-r v) (:block/schema ent))
:tags (not= (set v) (set (map :block/uuid (:block/tags ent))))
:properties (not= (transit/read transit-r v) (:block/properties ent))
:link (not= v (:block/uuid (:block/link ent)))
:journal-day (not= v (:block/journal-day ent))
false))
op-value))))
(let [r (some (fn [[k v]]
(case k
:content (not= v (:block/raw-content ent))
:updated-at (not= v (:block/updated-at ent))
:created-at (not= v (:block/created-at ent))
:alias (not= (set v) (set (map :block/uuid (:block/alias ent))))
:type (not= (set v) (set (:block/type ent)))
:schema (not= (transit/read transit-r v) (:block/schema ent))
:tags (not= (set v) (set (map :block/uuid (:block/tags ent))))
:properties (not= (transit/read transit-r v) (:block/properties ent))
:link (not= v (:block/uuid (:block/link ent)))
:journal-day (not= v (:block/journal-day ent))
false))
op-value)]
(prn :need-update-block? r)
r))))
(defn- update-block-attrs
[repo conn date-formatter block-uuid {:keys [parents properties _content] :as op-value}]