Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-03-18 10:41:29 -05:00
Code Issues Activity

🐛 Add migration for fix unreferenced shapes on frames.

Browse source
This commit is contained in:
Andrey Antukh 2021-07-15 17:23:51 +02:00
parent 946309a485
commit f29d54ad0d
2 changed files with 12 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
common/src/app/common/pages/common.cljc
View file

@ -8,7 +8,7 @@
(:require
[app.common.uuid :as uuid]))
(def file-version 10)
(def file-version 11)
(def default-color "#b1b2b5") ;; $color-gray-20
(def root uuid/zero)

11
common/src/app/common/pages/migrations.cljc
View file

@ -256,4 +256,15 @@
(d/update-in-when page [:objects uuid/zero] dissoc :points :selrect))]
(update data :pages-index #(d/mapm update-page %))))
(defmethod migrate 11
[data]
(letfn [(update-object [objects id shape]
(if (= :frame (:type shape))
(d/update-when shape :shapes (fn [shapes]
(filterv (fn [id] (contains? objects id)) shapes)))
shape))
(update-page [id {:keys [objects] :as page}]
(d/mapm (partial update-object objects) objects))]
(update data :pages-index #(d/mapm update-page %))))