github/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2026-08-07 13:29:07 +00:00
Code Issues Packages Projects Releases Wiki Activity

✨ Add missing srepl helper for disable objects-map feat

Browse Source
This commit is contained in:
Andrey Antukh 2025-09-30 13:49:30 +02:00
parent 62563d28d0
commit 9f2dc06c95
1 changed files with 14 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
backend/src/app/features/fdata.clj
View File

@ -49,6 +49,20 @@
(update :data update-data) (update :data update-data)
(update :features conj "fdata/objects-map")))) (update :features conj "fdata/objects-map"))))
(defn disable-objects-map
[file & _opts]
(let [update-page
(fn [page]
(update page :objects #(into {} %)))
update-data
(fn [fdata]
(update fdata :pages-index d/update-vals update-page))]
(-> file
(update :data update-data)
(update :features disj "fdata/objects-map"))))
(defn process-objects (defn process-objects
"Apply a function to all objects-map on the file. Usualy used for convert "Apply a function to all objects-map on the file. Usualy used for convert
the objects-map instances to plain maps" the objects-map instances to plain maps"