fix: get-state had old block data

This commit is contained in:
rcmerci
2021-04-30 14:35:24 +08:00
parent 23662bbd59
commit 05e4ffef14

View File

@@ -484,7 +484,7 @@
:sidebar? sidebar?
:format format
:id id
:block block
:block (or (db/pull [:block/uuid (:block/uuid block)]) block)
:block-id block-id
:block-parent-id block-parent-id
:node node
@@ -1856,7 +1856,8 @@
(text/remove-property "including-parent")
template/resolve-dynamic-template!)))
(clear-when-saved!)
(insert-command! id "" format {}))
(insert-command! id "" format {})
(db/refresh! repo {:key :block/insert :data [(db/pull db-id)]}))
(when-let [input (gdom/getElement id)]
(.focus input))))
@@ -2129,19 +2130,19 @@
(state/set-editor-op! :indent)
(profile "indent on tab"
(let [{:keys [block block-parent-id value config]} (get-state)]
(when block
(let [current-node (outliner-core/block block)
first-child? (outliner-core/first-child? current-node)]
(when-not first-child?
(let [left (tree/-get-left current-node)
children-of-left (tree/-get-children left)]
(if (seq children-of-left)
(let [target-node (last children-of-left)]
(outliner-core/move-subtree current-node target-node true))
(outliner-core/move-subtree current-node left false))
(let [repo (state/get-current-repo)]
(db/refresh! repo
{:key :block/change :data [(:data current-node)]}))))))))
(when block
(let [current-node (outliner-core/block block)
first-child? (outliner-core/first-child? current-node)]
(when-not first-child?
(let [left (tree/-get-left current-node)
children-of-left (tree/-get-children left)]
(if (seq children-of-left)
(let [target-node (last children-of-left)]
(outliner-core/move-subtree current-node target-node true))
(outliner-core/move-subtree current-node left false))
(let [repo (state/get-current-repo)]
(db/refresh! repo
{:key :block/change :data [(:data current-node)]}))))))))
(state/set-editor-op! :nil))
(defn outdent-on-shift-tab