mirror of
https://github.com/logseq/logseq.git
synced 2026-02-01 22:47:36 +00:00
fix: tags
This commit is contained in:
11
deps/outliner/src/logseq/outliner/core.cljs
vendored
11
deps/outliner/src/logseq/outliner/core.cljs
vendored
@@ -242,12 +242,19 @@
|
||||
;; Notice: should check `page?` for block from the current db
|
||||
(if (ldb/page? (d/entity db (:db/id block)))
|
||||
block
|
||||
(let [page-class? (fn [t]
|
||||
(let [tags' (cond
|
||||
(qualified-keyword? tags)
|
||||
[(d/entity db tags)]
|
||||
(every? qualified-keyword? tags)
|
||||
(map #(d/entity db %) tags)
|
||||
:else
|
||||
tags)
|
||||
page-class? (fn [t]
|
||||
(and (map? t) (contains? db-class/page-classes
|
||||
(or (:db/ident t)
|
||||
(when-let [id (:block/uuid t)]
|
||||
(:db/ident (d/entity db [:block/uuid id])))))))
|
||||
page-classes (filter page-class? tags)]
|
||||
page-classes (filter page-class? tags')]
|
||||
(if (seq page-classes)
|
||||
(-> block
|
||||
(update :block/tags
|
||||
|
||||
Reference in New Issue
Block a user