From 7d32d0315620df01cd5c1752a38e252ee66c9ae5 Mon Sep 17 00:00:00 2001
From: Andrey Antukh <niwi@niwi.nz>
Date: Thu, 31 Mar 2022 00:28:09 +0200
Subject: [PATCH] :lipstick: Add cosmetic changes on workspace/changes ns

---
 frontend/src/app/main/data/workspace/changes.cljs | 11 +++--------
 1 file changed, 3 insertions(+), 8 deletions(-)

diff --git a/frontend/src/app/main/data/workspace/changes.cljs b/frontend/src/app/main/data/workspace/changes.cljs
index 1b298f285..2738d6d4f 100644
--- a/frontend/src/app/main/data/workspace/changes.cljs
+++ b/frontend/src/app/main/data/workspace/changes.cljs
@@ -48,20 +48,15 @@
 
              changes   (reduce
                          (fn [changes id]
-                           (pcb/update-shapes changes
-                                              [id]
-                                              update-fn
-                                              {:attrs attrs
-                                               :ignore-geometry? (get ignore-tree id)}))
+                           (let [opts {:attrs attrs :ignore-geometry? (get ignore-tree id)}]
+                             (pcb/update-shapes changes [id] update-fn opts)))
                          (-> (pcb/empty-changes it page-id)
                              (pcb/set-save-undo? save-undo?)
                              (pcb/with-objects objects))
                          ids)]
 
          (when (seq (:redo-changes changes))
-           (let [changes  (cond-> changes
-                            reg-objects?
-                            (pcb/resize-parents ids))]
+           (let [changes  (cond-> changes reg-objects? (pcb/resize-parents ids))]
              (rx/of (commit-changes changes)))))))))
 
 (defn update-indices