3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-07-26 03:07:17 +02:00
Code Issues Projects Releases Packages Wiki Activity

Extract missing reference error check

Browse source
This commit is contained in:
Florian Schroedl 2024-06-25 16:30:57 +02:00
parent 2c42ca5a4b
commit af374276e4
2 changed files with 6 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
frontend/src/app/main/ui/workspace/tokens/form.cljs
View file

@ -83,7 +83,7 @@
(let [{:keys [errors resolved-value] :as resolved-token} (get resolved-tokens token-id)] (let [{:keys [errors resolved-value] :as resolved-token} (get resolved-tokens token-id)]
(cond (cond
resolved-value (p/resolved resolved-token) resolved-value (p/resolved resolved-token)
(= #{:style-dictionary/missing-reference} errors) (p/rejected :error/token-missing-reference) (sd/missing-reference-error? errors) (p/rejected :error/token-missing-reference)
:else (p/rejected :error/unknown-error)))))))))) :else (p/rejected :error/unknown-error))))))))))
(defn use-debonced-resolve-callback (defn use-debonced-resolve-callback

5
frontend/src/app/main/ui/workspace/tokens/style_dictionary.cljs
View file

@ -77,6 +77,11 @@
errors) errors)
(str/join "\n"))) (str/join "\n")))
(defn missing-reference-error?
[errors]
(and (set? errors)
(get errors :style-dictionary/missing-reference)))
(defn tokens-name-map [tokens] (defn tokens-name-map [tokens]
(->> tokens (->> tokens
(map (fn [[_ x]] [(:name x) x])) (map (fn [[_ x]] [(:name x) x]))