diff --git a/src/uxbox/main/geom.cljs b/src/uxbox/main/geom.cljs
index fdb3b0a4f..a720b19bf 100644
--- a/src/uxbox/main/geom.cljs
+++ b/src/uxbox/main/geom.cljs
@@ -10,21 +10,6 @@
             [uxbox.util.math :as mth]
             [uxbox.main.state :as st]))
 
-;; --- Types
-
-(def +hierarchy+
-  (-> (make-hierarchy)
-      (derive ::rect ::shape)
-      (derive :icon ::rect)
-      (derive :rect ::rect)
-      (derive :circle ::shape)
-      (derive :text ::rect)
-      (derive :group ::rect)))
-
-(defn shape?
-  [type]
-  (isa? +hierarchy+ type ::shape))
-
 ;; --- Relative Movement
 
 (declare move-rect)