github/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2026-04-26 19:58:09 +00:00
Code Issues Packages Projects Releases Wiki Activity

⚡ Remove repeated/duplucated lookups on start-undo-transaction

Browse Source
This commit is contained in:
Andrey Antukh 2025-08-25 10:20:53 +02:00 committed by Pablo Alba
parent 6eeb55fb88
commit c9393c0cfb
1 changed files with 6 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
frontend/src/app/main/data/workspace/undo.cljs
View File

@ -162,14 +162,12 @@
ptk/UpdateEvent
(update [_ state]
(log/info :hint "start-undo-transaction")
;; We commit the old transaction before starting the new one
(let [current-tx (get-in state [:workspace-undo :transaction])
pending-tx (get-in state [:workspace-undo :transactions-pending])]
(cond-> state
(nil? current-tx) (assoc-in [:workspace-undo :transaction] empty-tx)
(nil? pending-tx) (assoc-in [:workspace-undo :transactions-pending] #{id})
(some? pending-tx) (update-in [:workspace-undo :transactions-pending] conj id)
:always (update-in [:workspace-undo :transactions-pending-ts] assoc id (ct/now)))))
(update state :workspace-undo
(fn [undo-state]
(-> undo-state
(update :transaction #(d/nilv % empty-tx))
(update :transactions-pending assoc id (ct/now))))))
ptk/WatchEvent
(watch [_ _ _]