Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-02-01 11:59:17 -05:00
Code Issues Activity

Replace sets

Browse source
This commit is contained in:
Florian Schroedl 2024-09-23 15:18:46 +02:00
parent f5c122b0db
commit 4c327f38ef
2 changed files with 17 additions and 20 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
frontend/src/app/main/refs.cljs
View file

@ -468,6 +468,9 @@
(def workspace-selected-token-set-id (def workspace-selected-token-set-id
(l/derived wtts/get-selected-token-set-id st/state)) (l/derived wtts/get-selected-token-set-id st/state))
(def workspace-ordered-token-sets
(l/derived #(or (some-> % ctob/get-sets) []) tokens-lib))
(dm/legacy (dm/legacy
(def workspace-active-theme-ids (def workspace-active-theme-ids
(l/derived wtts/get-active-theme-ids st/state)) (l/derived wtts/get-active-theme-ids st/state))
@ -478,13 +481,6 @@
(def workspace-active-set-ids (def workspace-active-set-ids
(l/derived wtts/get-active-set-ids st/state)) (l/derived wtts/get-active-set-ids st/state))
(def workspace-ordered-token-sets
(l/derived
(fn [data]
(or (wtts/get-workspace-ordered-sets data) {}))
st/state
=))
(def workspace-active-theme-sets-tokens (def workspace-active-theme-sets-tokens
(l/derived wtts/get-active-theme-sets-tokens-names-map st/state =)) (l/derived wtts/get-active-theme-sets-tokens-names-map st/state =))

27
frontend/src/app/main/ui/workspace/tokens/sets.cljs
View file

@ -146,20 +146,21 @@
:as _props}] :as _props}]
(let [{:keys [editing? new? on-edit on-create on-reset] :as ctx} (or context (sets-context/use-context))] (let [{:keys [editing? new? on-edit on-create on-reset] :as ctx} (or context (sets-context/use-context))]
[:ul {:class (stl/css :sets-list)} [:ul {:class (stl/css :sets-list)}
(for [[id token-set] token-sets] (for [token-set token-sets]
(when token-set (when token-set
[:& sets-tree {:key id [:& sets-tree
:token-set token-set {:key (:name token-set)
:token-set-selected? (if new? (constantly false) token-set-selected?) :token-set token-set
:token-set-active? token-set-active? :token-set-selected? (if new? (constantly false) token-set-selected?)
:editing? editing? :token-set-active? token-set-active?
:on-select on-select :editing? editing?
:on-edit on-edit :on-select on-select
:on-toggle on-toggle-token-set :on-edit on-edit
:on-submit #(do :on-toggle on-toggle-token-set
(on-update-token-set %) :on-submit #(do
(on-reset)) (on-update-token-set %)
:on-cancel on-reset}])) (on-reset))
:on-cancel on-reset}]))
(when new? (when new?
[:& sets-tree {:token-set {:name ""} [:& sets-tree {:token-set {:name ""}
:token-set-selected? (constantly true) :token-set-selected? (constantly true)