clone/logseq
1
0
Fork 0
mirror of https://github.com/logseq/logseq.git synced 2026-05-27 22:24:09 +00:00
Code Issues Packages Projects Releases Wiki Activity

fix(rtc): fix wrong :block/tags data

Browse Source
This commit is contained in:
rcmerci
2023-12-11 16:59:15 +08:00
parent 5f7c902b5d
commit 144dc14d8f
1 changed files with 7 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
src/main/frontend/db/rtc/core.cljs
View File

@@ -69,9 +69,12 @@
[:toggle-auto-push-client-ops-chan :any]
[:*auto-push-client-ops? :any]
[:force-push-client-ops-chan :any]])
(def state-validator (fn [data] (if ((m/validator state-schema) data)
true
(prn (mu/explain-data state-schema data)))))
(def state-validator
(let [validator (m/validator state-schema)]
(fn [data]
(if (validator data)
true
(prn (mu/explain-data state-schema data))))))
(def rtc-state-schema
[:enum :open :closed])
@@ -272,7 +275,7 @@
(contains? key-set :tags) (assoc :block/tags (some->> (seq (:tags op-value))
(map (partial vector :block/uuid))
(db/pull-many repo [:db/id])
(keep :db/id)))
(filter :db/id)))
;; FIXME: it looks save-block won't save :block/properties??
;; so I need to transact properties myself
;; (contains? key-set :properties) (assoc :block/properties