Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-01-10 00:40:30 -05:00
Code Issues Activity

🐛 Properly filter complex data on events payload

Browse source
This commit is contained in:
Andrey Antukh 2022-03-14 12:39:37 +01:00
parent 70beb6c60c
commit e6d6b60b63
1 changed files with 16 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

18
frontend/src/app/main/data/events.cljs
View file

@ -133,6 +133,19 @@
(dissoc ::context) (dissoc ::context)
(cond-> origin (assoc :origin origin)))})))) (cond-> origin (assoc :origin origin)))}))))
(defn- filter-props
"Removes complex data types from props."
[data]
(into {}
(map (fn [[k v :as kv]]
(cond
(map? v) [k :placeholder/map]
(vector? v) [k :placeholder/vec]
(set? v) [k :placeholder/set]
(coll? v) [k :placeholder/coll]
:else kv)))
data))
(defmethod process-event ::generic-action (defmethod process-event ::generic-action
[event] [event]
(let [type (ptk/type event) (let [type (ptk/type event)
@ -143,8 +156,9 @@
{:type "action" {:type "action"
:name (or (::name mdata) (name type)) :name (or (::name mdata) (name type))
:props (merge (d/without-nils data) :props (-> (merge (d/without-nils data)
(d/without-nils (::props mdata))) (d/without-nils (::props mdata)))
(filter-props))
:context (d/without-nils :context (d/without-nils
{:event-origin (::origin mdata) {:event-origin (::origin mdata)
:event-namespace (namespace type) :event-namespace (namespace type)