From 3940995e21ab31619326242b65d4635653a57e40 Mon Sep 17 00:00:00 2001
From: Andrey Antukh <niwi@niwi.nz>
Date: Wed, 22 Feb 2017 21:02:40 +0100
Subject: [PATCH] Dont allow draw empty shapes.

---
 frontend/src/uxbox/main/data/workspace/drawing.cljs | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/frontend/src/uxbox/main/data/workspace/drawing.cljs b/frontend/src/uxbox/main/data/workspace/drawing.cljs
index e612eda286..0c98897855 100644
--- a/frontend/src/uxbox/main/data/workspace/drawing.cljs
+++ b/frontend/src/uxbox/main/data/workspace/drawing.cljs
@@ -229,9 +229,9 @@
                                      (rx/take 1)))
         start? (volatile! true)
         mouse (->> streams/viewport-mouse-position
+                   (rx/take-until stoper)
                    (rx/mapcat conditional-align)
                    (rx/map translate-to-canvas)
-                   (rx/take-until stoper)
                    (rx/with-latest vector streams/mouse-position-ctrl))]
 
     (letfn [(on-position [[point ctrl?]]
@@ -242,7 +242,9 @@
                 (st/emit! (update-drawing (assoc point :lock ctrl?)))))
 
             (on-finish []
-              (st/emit! (finish-drawing)))]
+              (if @start?
+                (st/emit! ::uev/interrupt)
+                (st/emit! (finish-drawing))))]
       (rx/subscribe mouse on-position nil on-finish))))
 
 (defn- on-init-draw-icon