0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-02-10 00:58:26 -05:00

📎 Add debug.validate_schema helper

This commit is contained in:
Andrey Antukh 2023-11-20 17:31:21 +01:00
parent 28ce6d2489
commit 366975f067

View file

@ -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)