From 8245ea0bdc25e87e7f941e0fa8c9ed40676b2a42 Mon Sep 17 00:00:00 2001
From: Andrey Antukh <niwi@niwi.nz>
Date: Wed, 1 Mar 2017 20:08:49 +0100
Subject: [PATCH] Remove unused code.

---
 frontend/src/uxbox/main/data/shapes.cljs      | 4 +---
 frontend/src/uxbox/main/data/shapes_impl.cljs | 2 +-
 2 files changed, 2 insertions(+), 4 deletions(-)

diff --git a/frontend/src/uxbox/main/data/shapes.cljs b/frontend/src/uxbox/main/data/shapes.cljs
index 6e8cf791d4..9bf90c5cf4 100644
--- a/frontend/src/uxbox/main/data/shapes.cljs
+++ b/frontend/src/uxbox/main/data/shapes.cljs
@@ -585,10 +585,8 @@
     ptk/UpdateEvent
     (update [_ state]
       (let [pid (get-in state [:workspace :page])
-            used-names (map #(get-in state [:shapes % :name])
-                            (get-in state [:pages pid :shapes]))
             selected (get-in state [:workspace :selected])]
-        (impl/group-shapes state selected used-names pid)))))
+        (impl/group-shapes state selected pid)))))
 
 (defn degroup-selected
   []
diff --git a/frontend/src/uxbox/main/data/shapes_impl.cljs b/frontend/src/uxbox/main/data/shapes_impl.cljs
index 1c7d426787..b9551bcd55 100644
--- a/frontend/src/uxbox/main/data/shapes_impl.cljs
+++ b/frontend/src/uxbox/main/data/shapes_impl.cljs
@@ -310,7 +310,7 @@
     (reduce match #{} (sequence xf shapes))))
 
 (defn group-shapes
-  [state shapes used-names page]
+  [state shapes page]
   (letfn [(replace-first-item [pred coll replacement]
             (into []
               (concat