fix: add tags when not exists

experiment/tanstack-table
Tienson Qin 2024-06-05 22:37:14 +08:00
parent 9c955081ab
commit 592e2a9b26
1 changed files with 7 additions and 5 deletions

View File

@ -208,12 +208,14 @@
(defn- add-tag-types
[repo db txs-state new-tags]
(when (sqlite-util/db-based-graph? repo)
(let [add-tag-type (map
(let [add-tag-type (keep
(fn [t]
(let [eid (outliner-pipeline/ref->eid t)]
(when (and (:block/original-name t) eid)
(db-class/build-new-class
db
{:db/id (outliner-pipeline/ref->eid t)
:block/original-name (:block/original-name t)}))
{:db/id eid
:block/original-name (:block/original-name t)}))))
new-tags)]
(swap! txs-state (fn [txs] (concat txs add-tag-type))))))