fix: load user defined closed values

they aren't lazy loaded by the UI
pull/11177/head
Gabriel Horner 2024-04-22 14:16:02 -04:00
parent a66210840e
commit 71f01b1115
1 changed files with 3 additions and 5 deletions

View File

@ -184,11 +184,9 @@
(map :db/id) (map :db/id)
(into #{:block/tags :block/alias})) (into #{:block/tags :block/alias}))
properties (d/pull-many db '[*] property-ids) properties (d/pull-many db '[*] property-ids)
closed-values (->> properties closed-values (->> (d/datoms db :avet :block/type "closed value")
(mapcat (fn [block] (map :e)
(let [values (get-in block [:block/schema :values])] (d/pull-many db '[*])
(when (seq values)
(d/pull-many db '[*] (map #(vector :block/uuid %) values))))))
(mapcat (fn [block] (cons block (property-with-values db block)))) (mapcat (fn [block] (cons block (property-with-values db block))))
(map (fn [block] (map (fn [block]
(let [val (:logseq.property/created-from-property block)] (let [val (:logseq.property/created-from-property block)]