mirror of
https://github.com/penpot/penpot.git
synced 2025-07-10 10:57:21 +02:00
Make passing of names-map explicit
This commit is contained in:
parent
7c3716a709
commit
011fc734f6
3 changed files with 26 additions and 6 deletions
|
@ -74,14 +74,14 @@
|
|||
(get errors :style-dictionary/missing-reference)))
|
||||
|
||||
(defn resolve-tokens+
|
||||
[tokens & {:keys [debug?] :as config}]
|
||||
[tokens & {:keys [names-map? debug?] :as config}]
|
||||
(p/let [sd-tokens (-> (wtt/token-names-tree tokens)
|
||||
(resolve-sd-tokens+ config))]
|
||||
(let [resolved-tokens (reduce
|
||||
(fn [acc ^js cur]
|
||||
(let [identifier (if (uuid? (ffirst tokens))
|
||||
(uuid (.-uuid (.-id cur)))
|
||||
(.. cur -original -name))
|
||||
(let [identifier (if names-map?
|
||||
(.. cur -original -name)
|
||||
(uuid (.-uuid (.-id cur))))
|
||||
origin-token (get tokens identifier)
|
||||
parsed-value (wtt/parse-token-value (.-value cur))
|
||||
resolved-token (if (not parsed-value)
|
||||
|
|
|
@ -124,7 +124,7 @@
|
|||
(rx/from
|
||||
(->
|
||||
(wtts/get-active-theme-sets-tokens-names-map state)
|
||||
(wtsd/resolve-tokens+)))
|
||||
(wtsd/resolve-tokens+ {:names-map? true})))
|
||||
(rx/mapcat
|
||||
(fn [sd-tokens]
|
||||
(let [undo-id (js/Symbol)]
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue