github/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2026-09-08 21:19:49 +00:00
Code Issues Packages Projects Releases Wiki Activity

🐛 Clear invalid keys from color libraries

Browse Source
This commit is contained in:
Andrey Antukh 2025-06-25 13:26:56 +02:00
parent 15c91a5de5
commit 93cbd99932
2 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
common/src/app/common/files/migrations.cljc
View File

@ -1480,7 +1480,7 @@
(update :pages-index d/update-vals update-container) (update :pages-index d/update-vals update-container)
(d/update-when :components d/update-vals update-container)))) (d/update-when :components d/update-vals update-container))))
(defmethod migrate-data "0008-fix-library-colors" (defmethod migrate-data "0008-fix-library-colors-v2"
[data _] [data _]
(letfn [(clear-color-opacity [color] (letfn [(clear-color-opacity [color]
(if (and (contains? color :opacity) (if (and (contains? color :opacity)
@ -1490,6 +1490,7 @@
(clear-color [color] (clear-color [color]
(-> color (-> color
(select-keys types.color/library-color-attrs)
(d/without-nils) (d/without-nils)
(d/without-qualified) (d/without-qualified)
(clear-color-opacity)))] (clear-color-opacity)))]
@ -1559,4 +1560,4 @@
"0005-deprecate-image-type" "0005-deprecate-image-type"
"0006-fix-old-texts-fills" "0006-fix-old-texts-fills"
"0007-clear-invalid-strokes-and-fills-v2" "0007-clear-invalid-strokes-and-fills-v2"
"0008-fix-library-colors"])) "0008-fix-library-colors-v2"]))

3
common/src/app/common/types/color.cljc
View File

@ -150,6 +150,9 @@
(sm/optional-keys schema:image-color)] (sm/optional-keys schema:image-color)]
[:fn has-valid-color-attrs?]]) [:fn has-valid-color-attrs?]])
(def library-color-attrs
(sm/keys schema:library-color-attrs))
(def valid-color? (def valid-color?
(sm/lazy-validator schema:color)) (sm/lazy-validator schema:color))