From 70282daaf79a4b70a5157ba49cc16d6253591c74 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Jes=C3=BAs=20Espino?= <jespinog@gmail.com>
Date: Fri, 15 Apr 2016 18:05:07 +0200
Subject: [PATCH] Fix blocked groups selection

---
 src/uxbox/data/shapes.cljs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/uxbox/data/shapes.cljs b/src/uxbox/data/shapes.cljs
index b94ad2d129..0b5d529788 100644
--- a/src/uxbox/data/shapes.cljs
+++ b/src/uxbox/data/shapes.cljs
@@ -14,7 +14,6 @@
             [uxbox.state.shapes :as stsh]
             [uxbox.schema :as sc]
             [uxbox.xforms :as xf]
-            [uxbox.shapes :as sh]
             [uxbox.data.pages :as udp]
             [uxbox.util.geom.point :as gpt]
             [uxbox.util.data :refer (index-of)]))
@@ -305,7 +304,8 @@
             xf (comp
                 (filter #(= (:page %) pageid))
                 (remove :hidden)
-                (remove :blocked)
+                (remove #(and (not (:blocked %)) (= (:type %) :builtin/group)))
+                (remove #(and (not= % (sh/resolve-parent %)) (:blocked (sh/resolve-parent %))))
                 (map sh/outer-rect')
                 (filter #(sh/contained-in? % selrect))
                 (map :id))]