mirror of
https://github.com/penpot/penpot.git
synced 2026-04-26 19:58:09 +00:00
📎 Add debug.validate_schema helper
This commit is contained in:
parent
28ce6d2489
commit
366975f067
@ -394,6 +394,15 @@
|
||||
(catch :default cause
|
||||
(errors/print-error! cause))))))
|
||||
|
||||
(defn ^:export validate-schema
|
||||
[]
|
||||
(try
|
||||
(-> (get @st/state :workspace-file)
|
||||
(assoc :data (get @st/state :workspace-data))
|
||||
(cfv/validate-file-schema!))
|
||||
(catch :default cause
|
||||
(errors/print-error! cause))))
|
||||
|
||||
(defn ^:export repair
|
||||
[]
|
||||
(let [file (assoc (get @st/state :workspace-file)
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user