3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-05-21 01:26:10 +02:00
Code Issues Projects Releases Packages Wiki Activity

🐛 Fix error first time doing a component change operation

Browse source
This commit is contained in:
Andrés Moya 2023-05-29 10:15:54 +02:00 • committed by Alonso Torres
parent fd6001090e
commit eeaee5fd13
1 changed files with 12 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

23
frontend/src/app/main/data/workspace/libraries.cljs
View file

@ -887,17 +887,18 @@
check-changes check-changes
(fn [[event [old-data _mid_data _new-data]]] (fn [[event [old-data _mid_data _new-data]]]
(let [{:keys [changes save-undo? undo-group]} (deref event) (when old-data
components-changed (reduce #(into %1 (ch/components-changed old-data %2)) (let [{:keys [changes save-undo? undo-group]} (deref event)
#{} components-changed (reduce #(into %1 (ch/components-changed old-data %2))
changes)] #{}
(when (and (d/not-empty? components-changed) save-undo?) changes)]
(log/info :msg "DETECTED COMPONENTS CHANGED" (when (and (d/not-empty? components-changed) save-undo?)
:ids (map str components-changed) (log/info :msg "DETECTED COMPONENTS CHANGED"
:undo-group undo-group) :ids (map str components-changed)
(run! st/emit! :undo-group undo-group)
(map #(update-component-sync % (:id old-data) undo-group) (run! st/emit!
components-changed)))))] (map #(update-component-sync % (:id old-data) undo-group)
components-changed))))))]
(when components-v2 (when components-v2
(->> change-s (->> change-s