clone/logseq
1
0
Fork 0
mirror of https://github.com/logseq/logseq.git synced 2026-05-03 18:36:43 +00:00
Code Issues Packages Projects Releases Wiki Activity

feat: add data-refs to empower css mods

Browse Source 
The discussion thread: https://discuss.logseq.com/t/propositions-to-empower-css-mods/289
This commit is contained in:
Tienson Qin
2021-02-05 21:44:58 +08:00
parent 9077499ec0
commit 38cec6fa8b
3 changed files with 41 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
src/main/frontend/handler/block.cljs
View File

@@ -15,7 +15,14 @@
(dissoc h :block/meta))) col)
parent? (fn [item children]
(and (seq children)
(every? #(< (:block/level item) (:block/level %)) children)))]
(every? #(< (:block/level item) (:block/level %)) children)))
get-all-refs (fn [block]
(let [refs (if-let [refs (seq (:block/refs-with-children block))]
refs
(concat
(:block/ref-pages block)
(:block/tags block)))]
(distinct refs)))]
(loop [col (reverse col)
children (list)]
(if (empty? col)
@@ -23,7 +30,8 @@
(let [[item & others] col
cur-level (:block/level item)
bottom-level (:block/level (first children))
pre-block? (:block/pre-block? item)]
pre-block? (:block/pre-block? item)
item (assoc item :block/refs-with-children (get-all-refs item))]
(cond
(empty? children)
(recur others (list item))
@@ -38,9 +46,12 @@
(let [[children other-children] (split-with (fn [h]
(> (:block/level h) cur-level))
children)
refs-with-children (-> (mapcat get-all-refs (cons item children))
distinct)
children (cons
(assoc item :block/children children)
(assoc item
:block/children children
:block/refs-with-children refs-with-children)
other-children)]
(recur others children))))))))