update tree no transform drag-end

Author: sprocketc

src/renderer/element/impl/container/canvas.cljs

@@ -98,8 +98,7 @@
            (when (and transform-active pivot-point)
              [overlay/times pivot-point])])
 
-        (when (and (= state :idle)
-                   (or (= tool :edit)
+        (when (and (or (= tool :edit)
                        (= primary-tool :edit)))
           (for [el selected-elements]
             ^{:key (str (:id el) "-edit-points")}

src/renderer/tool/impl/base/transform.cljs

@@ -217,10 +217,10 @@
 (m/=> translate [:-> App Vec2D [:maybe Orientation] App])
 (defn translate
   [db offset axis]
-  (let [offset (if axis (case axis
-                          :vertical [(first offset) 0]
-                          :horizontal [0 (second offset)])
-                   offset)]
+  (let [offset (case axis
+                 :vertical [(first offset) 0]
+                 :horizontal [0 (second offset)]
+                 offset)]
     (reduce (fn [db id]
               (let [container (element.h/parent-container db id)
                     hovered-svg-k (:id (element.h/hovered-svg db))]
@@ -314,14 +314,14 @@
         :select (-> (cond-> db (not (pointer/shift? e)) element.h/deselect)
                     (reduce-by-area (pointer/alt? e) element.h/select)
                     (h/dissoc-temp)
-                    (snap.h/update-tree)
                     (h/explain "Modify selection"))
         :translate (h/explain db "Move selection")
         :scale (h/explain db "Scale selection")
         :clone (h/explain db "Clone selection")
         :idle db)
       (h/set-state :idle)
       (element.h/clear-hovered)
+      (snap.h/update-tree)
       (dissoc :clicked-element :pivot-point)))
 
 (defmethod hierarchy/snapping-bases :transform