Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-01-21 06:02:32 -05:00
Code Issues Activity

Fix up active themes tokens method

Browse source
This commit is contained in:
Florian Schroedl 2024-09-26 16:16:44 +02:00
parent 577fa2bc81
commit 9f2b96332c
1 changed files with 8 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

16
common/src/app/common/types/tokens_lib.cljc
View file

@ -605,14 +605,14 @@
(get-active-themes this)))
(get-active-themes-set-tokens [this]
(mapcat (fn [x]
(->> (get x :sets)
(map (fn [y]
(->
(get-set this y)
:tokens)))))
(get-active-themes this)))
(reduce
(fn [acc cur]
(if (theme-active? this (:group cur) (:name cur))
(into acc
(->> (get cur :sets)
(map #(-> (get-set this %) :tokens))))
acc))
(d/ordered-map) (tree-seq d/ordered-map? vals themes)))
(validate [_]
(and (valid-token-sets? sets) ;; TODO: validate set-groups