Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-02-08 08:09:14 -05:00
Code Issues Activity

🐛 Fix shadows order

Browse source
This commit is contained in:
Alejandro Alonso 2025-01-22 07:58:25 +01:00
parent 83bd479176
commit 35b442d6a7
3 changed files with 17 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
common/src/app/common/files/defaults.cljc
View file

@ -6,4 +6,4 @@
(ns app.common.files.defaults) (ns app.common.files.defaults)
(def version 60) (def version 61)

15
common/src/app/common/files/migrations.cljc
View file

@ -1163,6 +1163,18 @@
(update :pages-index update-vals update-container) (update :pages-index update-vals update-container)
(update :components update-vals update-container)))) (update :components update-vals update-container))))
(defn migrate-up-61
[data]
(letfn [(update-object [object]
(d/update-when object :shadow #(into [] (reverse %))))
(update-container [container]
(d/update-when container :objects update-vals update-object))]
(-> data
(update :pages-index update-vals update-container)
(update :components update-vals update-container))))
(def migrations (def migrations
"A vector of all applicable migrations" "A vector of all applicable migrations"
[{:id 2 :migrate-up migrate-up-2} [{:id 2 :migrate-up migrate-up-2}
@ -1213,5 +1225,6 @@
{:id 56 :migrate-up migrate-up-56} {:id 56 :migrate-up migrate-up-56}
{:id 57 :migrate-up migrate-up-57} {:id 57 :migrate-up migrate-up-57}
{:id 59 :migrate-up migrate-up-59} {:id 59 :migrate-up migrate-up-59}
{:id 60 :migrate-up migrate-up-60}]) {:id 60 :migrate-up migrate-up-60}
{:id 61 :migrate-up migrate-up-61}])

3
frontend/src/app/main/ui/shapes/filters.cljs
View file

@ -161,7 +161,8 @@
(mf/defc filters (mf/defc filters
[{:keys [filter-id shape]}] [{:keys [filter-id shape]}]
(let [filters (-> shape gsb/shape->filters change-filter-in) (let [shape' (update shape :shadow reverse)
filters (-> shape' gsb/shape->filters change-filter-in)
bounds (gsb/get-rect-filter-bounds (:selrect shape) filters (or (-> shape :blur :value) 0)) bounds (gsb/get-rect-filter-bounds (:selrect shape) filters (or (-> shape :blur :value) 0))
padding (gsb/calculate-padding shape) padding (gsb/calculate-padding shape)
selrect (:selrect shape) selrect (:selrect shape)