3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-07-31 03:28:30 +02:00
Code Issues Projects Releases Packages Wiki Activity

🔥 Remove duplicated change apply operation.

Browse source
This commit is contained in:
Andrey Antukh 2021-05-06 20:45:55 +02:00 • committed by Andrés Moya
parent a03882de76
commit e7b3f12b71
5 changed files with 20 additions and 26 deletions
Download patch file Download diff file Expand all files Collapse all files

17
frontend/src/app/main/data/workspace/changes.cljs
View file

@ -159,10 +159,8 @@
([changes undo-changes]
(commit-changes changes undo-changes {}))
([changes undo-changes {:keys [save-undo?
commit-local?
file-id]
:or {save-undo? true
commit-local? false}
:or {save-undo? true}
:as opts}]
(us/assert ::cp/changes changes)
(us/assert ::cp/changes undo-changes)
@ -173,23 +171,20 @@
(let [error (volatile! nil)]
(ptk/reify ::commit-changes
cljs.core/IDeref
(-deref [_] {:file-id file-id :changes changes})
(-deref [_]
{:file-id file-id
:changes changes})
ptk/UpdateEvent
(update [_ state]
(let [current-file-id (get state :current-file-id)
file-id (or file-id current-file-id)
path1 (if (= file-id current-file-id)
[:workspace-file :data]
[:workspace-libraries file-id :data])
path2 (if (= file-id current-file-id)
path (if (= file-id current-file-id)
[:workspace-data]
[:workspace-libraries file-id :data])]
(try
(us/assert ::spec/changes changes)
(let [state (update-in state path1 cp/process-changes changes false)]
(cond-> state
commit-local? (update-in path2 cp/process-changes changes false)))
(update-in state path cp/process-changes changes false)
(catch :default e
(vreset! error e)
state))))