johanels/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-12-11 22:14:05 +01:00
Code Issues Actions 9 Packages Projects Releases Wiki Activity

Add schema validation

Browse Source
This commit is contained in:
Florian Schroedl
2024-09-24 11:10:07 +02:00
parent 5e39f33bff
commit 44e4e85201
1 changed files with 8 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
common/src/app/common/types/tokens_lib.cljc
View File

@@ -348,6 +348,12 @@
(def check-token-themes! (def check-token-themes!
(sm/check-fn ::token-themes)) (sm/check-fn ::token-themes))
(def schema:active-token-themes
[:set string?])
(def valid-active-token-themes?
(sm/validator schema:active-token-themes))
;; === Tokens Lib ;; === Tokens Lib
(defprotocol ITokensLib (defprotocol ITokensLib
@@ -564,7 +570,8 @@
(validate [_] (validate [_]
(and (valid-token-sets? sets) ;; TODO: validate set-groups (and (valid-token-sets? sets) ;; TODO: validate set-groups
(valid-token-themes? themes)))) (valid-token-themes? themes)
(valid-active-token-themes? active-themes))))
(defn valid-tokens-lib? (defn valid-tokens-lib?
[o] [o]