clone/logseq
1
0
Fork 0
mirror of https://github.com/logseq/logseq.git synced 2026-05-04 02:46:45 +00:00
Code Issues Packages Projects Releases Wiki Activity

feat(ui): WIP number list block (own-property)

Browse Source
This commit is contained in:
charlie
2023-04-14 16:46:05 +08:00
parent ae652b5637
commit 8d6e9b7cfd
2 changed files with 18 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -291,3 +291,16 @@
(recur parent (conj result parent))
result))))]
(distinct (mapcat get-parents filtered-ref-blocks)))))
(defn get-idx-of-order-list-block
[block order-list-type]
(let [order-block-fn? #(some-> % :block/properties :logseq.order-list-type (= order-list-type))
prev-block-fn #(some->> (:db/id %) (db-model/get-prev-sibling (state/get-current-repo)))
prev-block (prev-block-fn block)]
(if prev-block
(letfn [(sibling-list [b]
(lazy-seq
(when (order-block-fn? b)
(cons b (sibling-list (prev-block-fn b))))))]
(count (sibling-list block)))
1)))