From f4ba1f4fdb3cea420c1045f7ca4c37a1d1266520 Mon Sep 17 00:00:00 2001
From: Andrey Antukh <niwi@niwi.nz>
Date: Fri, 22 Jan 2016 19:36:35 +0200
Subject: [PATCH] Reimplement deselect-all event.

---
 src/uxbox/data/workspace.cljs | 13 ++++++++++---
 1 file changed, 10 insertions(+), 3 deletions(-)

diff --git a/src/uxbox/data/workspace.cljs b/src/uxbox/data/workspace.cljs
index b71c2afeec..c149026e88 100644
--- a/src/uxbox/data/workspace.cljs
+++ b/src/uxbox/data/workspace.cljs
@@ -301,9 +301,16 @@
   "Mark a shape selected for drawing in the canvas."
   []
   (reify
-    rs/UpdateEvent
-    (-apply-update [_ state]
-      (assoc-in state [:workspace :selected] #{}))))
+    rs/WatchEvent
+    (-apply-watch [_ state]
+      (let [selected (get-in state [:workspace :selected])
+            mevent (rs/swap-state #(assoc-in state [:workspace :selected] #{}))]
+        (->> (map #(get-in state [:shapes-by-id %]) selected)
+             (rx/from-coll)
+             (rx/filter :group)
+             (rx/map :group)
+             (rx/map rebuild-group-size)
+             (rx/merge (rx/just mevent)))))))
 
 (defn copy-selected
   "Copy the selected shapes."