diff --git a/common/src/app/common/geom/align.cljc b/common/src/app/common/geom/align.cljc
index a69ab06cd..1aa4120f8 100644
--- a/common/src/app/common/geom/align.cljc
+++ b/common/src/app/common/geom/align.cljc
@@ -6,6 +6,7 @@
 
 (ns app.common.geom.align
   (:require
+   [app.common.geom.point :as gpt]
    [app.common.geom.rect :as grc]
    [app.common.geom.shapes :as gsh]
    [app.common.pages.helpers :refer [get-children]]))
@@ -32,9 +33,9 @@
   move also all of its recursive children."
   [shape rect axis objects]
   (let [wrapper-rect (gsh/shapes->rect [shape])
-        align-pos (calc-align-pos wrapper-rect rect axis)
-        delta {:x (- (:x align-pos) (:x wrapper-rect))
-               :y (- (:y align-pos) (:y wrapper-rect))}]
+        align-pos    (calc-align-pos wrapper-rect rect axis)
+        delta        (gpt/point (- (:x align-pos) (:x wrapper-rect))
+                                (- (:y align-pos) (:y wrapper-rect)))]
     (recursive-move shape delta objects)))
 
 (defn calc-align-pos