Revert "Remove update-radius-attrs event."

This reverts commit b1e9936aa6.

src/uxbox/main/data/shapes.cljs

@@ -237,6 +237,17 @@
                  (when color {:stroke color})
                  (when opacity {:stroke-opacity opacity})))))
 
+(defn update-radius-attrs
+  [sid {:keys [rx ry] :as opts}]
+  (reify
+    udp/IPageUpdate
+    rs/UpdateEvent
+    (-apply-update [_ state]
+      (update-in state [:shapes-by-id sid]
+                 merge
+                 (when rx {:rx rx})
+                 (when ry {:ry ry})))))
+
 (defn hide-shape
   [sid]
   (reify