diff --git a/src/uxbox/main/data/shapes.cljs b/src/uxbox/main/data/shapes.cljs
index 3fcf63db3e..5c0a0a0d0f 100644
--- a/src/uxbox/main/data/shapes.cljs
+++ b/src/uxbox/main/data/shapes.cljs
@@ -30,7 +30,8 @@
     udp/IPageUpdate
     rs/UpdateEvent
     (-apply-update [_ state]
-      (let [page (get-in state [:workspace :page])]
+      (let [page (get-in state [:workspace :page])
+            shape (geom/setup-proportions shape)]
         (stsh/assoc-shape-to-page state shape page)))))
 
 (defn delete-shape