fix: onboarding condition

This commit is contained in:
Peng Xiao
2022-11-03 10:53:45 +08:00
committed by Tienson Qin
parent 26f08061ac
commit fbbcb1f862

View File

@@ -244,9 +244,13 @@
:assets assets
:bindings bindings})))))
(defn should-populate-onboarding-whiteboard?
"When there is not whiteboard, or there is only whiteboard that is the given page name, we should populate the onboarding whiteboard"
[page-name]
(let [whiteboards (model/get-all-whiteboards (state/get-current-repo))]
(and (or (empty? whiteboards) (some #(= page-name (:block/name %)) whiteboards))
(and (or (empty? whiteboards)
(and
(= 1 (count whiteboards))
(= page-name (:block/name (first whiteboards)))))
(not (state/get-onboarding-whiteboard?)))))
(defn populate-onboarding-whiteboard