enhance: separate references/queries collapse state from db

addresses #3744
This commit is contained in:
Tienson Qin
2022-01-05 20:41:19 +08:00
parent ca2e6b1312
commit 9f8028d51b
3 changed files with 50 additions and 17 deletions

View File

@@ -3378,12 +3378,21 @@
(map (fn [x] (dissoc x :block/children))))
(remove nil?)))))
(defn- skip-collapsing-in-db?
[]
(let [config (:config (state/get-editor-args))]
(or (:ref? config) (:block? config))))
(defn collapse-block! [block-id]
(when (collapsable? block-id)
(set-block-property! block-id :collapsed true)))
(when-not (skip-collapsing-in-db?)
(set-block-property! block-id :collapsed true))
(state/set-collapsed-block! block-id true)))
(defn expand-block! [block-id]
(remove-block-property! block-id :collapsed))
(when-not (skip-collapsing-in-db?)
(remove-block-property! block-id :collapsed))
(state/set-collapsed-block! block-id false))
(defn expand!
([e] (expand! e false))