3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-06-01 04:51:37 +02:00
Code Issues Projects Releases Packages Wiki Activity

🐛 Fix problem with shadows

Browse source
This commit is contained in:
alonso.torres 2024-05-28 09:53:20 +02:00 • committed by Andrey Antukh
parent dad91421b1
commit 032e551dc1
2 changed files with 23 additions and 21 deletions
Download patch file Download diff file Expand all files Collapse all files

2
frontend/src/app/plugins/shape.cljs
View file

@ -233,7 +233,7 @@
:blur 4 :blur 4
:spread 0 :spread 0
:hidden false} :hidden false}
(utils/from-js val))) (utils/from-js val #{:style :type})))
value)] value)]
(st/emit! (dwc/update-shapes [id] #(assoc % :shadow value)))))} (st/emit! (dwc/update-shapes [id] #(assoc % :shadow value)))))}

42
frontend/src/app/plugins/utils.cljs
View file

@ -124,30 +124,32 @@
(defn from-js (defn from-js
"Converts the object back to js" "Converts the object back to js"
[obj] ([obj]
(when (some? obj) (from-js obj #{:type}))
(let [process-node ([obj keyword-keys]
(fn process-node [node] (when (some? obj)
(reduce-kv (let [process-node
(fn [m k v] (fn process-node [node]
(let [k (keyword (str/kebab k)) (reduce-kv
v (cond (map? v) (fn [m k v]
(process-node v) (let [k (keyword (str/kebab k))
v (cond (map? v)
(process-node v)
(vector? v) (vector? v)
(mapv process-node v) (mapv process-node v)
(and (string? v) (re-matches us/uuid-rx v)) (and (string? v) (re-matches us/uuid-rx v))
(uuid/uuid v) (uuid/uuid v)
(= k :type) (contains? keyword-keys k)
(keyword v) (keyword v)
:else v)] :else v)]
(assoc m k v))) (assoc m k v)))
{} {}
node))] node))]
(process-node (js->clj obj))))) (process-node (js->clj obj))))))
(defn to-js (defn to-js
"Converts to javascript an camelize the keys" "Converts to javascript an camelize the keys"