mirror of
https://github.com/penpot/penpot.git
synced 2026-02-12 14:42:56 +00:00
Extract missing reference error check
This commit is contained in:
@@ -83,7 +83,7 @@
|
||||
(let [{:keys [errors resolved-value] :as resolved-token} (get resolved-tokens token-id)]
|
||||
(cond
|
||||
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))))))))))
|
||||
|
||||
(defn use-debonced-resolve-callback
|
||||
|
||||
@@ -77,6 +77,11 @@
|
||||
errors)
|
||||
(str/join "\n")))
|
||||
|
||||
(defn missing-reference-error?
|
||||
[errors]
|
||||
(and (set? errors)
|
||||
(get errors :style-dictionary/missing-reference)))
|
||||
|
||||
(defn tokens-name-map [tokens]
|
||||
(->> tokens
|
||||
(map (fn [[_ x]] [(:name x) x]))
|
||||
|
||||
Reference in New Issue
Block a user