From fd9503af1d52119fb9b513e4b2961753df715235 Mon Sep 17 00:00:00 2001
From: Andrey Antukh <niwi@niwi.nz>
Date: Sat, 27 Aug 2016 17:47:28 +0300
Subject: [PATCH] Split specialized path drawing area from the generic one.

---
 src/uxbox/main/ui/workspace/drawarea.cljs | 28 +++++++++++++++++------
 1 file changed, 21 insertions(+), 7 deletions(-)

diff --git a/src/uxbox/main/ui/workspace/drawarea.cljs b/src/uxbox/main/ui/workspace/drawarea.cljs
index 6d552c57c..f0e6dd56f 100644
--- a/src/uxbox/main/ui/workspace/drawarea.cljs
+++ b/src/uxbox/main/ui/workspace/drawarea.cljs
@@ -50,20 +50,34 @@
   (.close (::sub own))
   (dissoc own ::sub))
 
+(declare generic-shape-draw-area)
+(declare path-shape-draw-area)
+
 (mx/defc draw-area
   {:will-mount draw-area-will-mount
    :will-unmount draw-area-will-unmount
    :mixins [mx/static mx/reactive]}
-  [own]
+  []
   (let [shape (mx/react drawing-shape)
         position (mx/react drawing-position)]
     (when shape
-      (if position
-        (-> (assoc shape :drawing? true)
-            (geom/resize position)
-            (shapes/render-component))
-        (-> (assoc shape :drawing? true)
-            (shapes/render-component))))))
+      (if (= (:type shape) :path)
+        (path-shape-draw-area shape)
+        (generic-shape-draw-area shape position)))))
+
+(mx/defc generic-shape-draw-area
+  [shape position]
+  (if position
+    (-> (assoc shape :drawing? true)
+        (geom/resize position)
+        (shapes/render-component))
+    (-> (assoc shape :drawing? true)
+        (shapes/render-component))))
+
+(mx/defc path-shape-draw-area
+  [shape]
+  (-> (assoc shape :drawing? true)
+      (shapes/render-component)))
 
 ;; --- Drawing Initialization