From 53621ceeebe3f2253a71a4d0cd11c3fcafc3ba94 Mon Sep 17 00:00:00 2001 From: Andrey Antukh Date: Sun, 28 Aug 2016 10:23:47 +0300 Subject: [PATCH] Code cleaning on drawarea. --- src/uxbox/main/ui/workspace/drawarea.cljs | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/src/uxbox/main/ui/workspace/drawarea.cljs b/src/uxbox/main/ui/workspace/drawarea.cljs index 726d04570d..33c9bec11a 100644 --- a/src/uxbox/main/ui/workspace/drawarea.cljs +++ b/src/uxbox/main/ui/workspace/drawarea.cljs @@ -79,12 +79,12 @@ [{:keys [points] :as shape}] (letfn [(on-click [event] (dom/stop-propagation event) - (swap! drawing-shape - (fn [shape] - (let [points (:points shape) - points (vec (butlast points))] - (assoc shape :points points :close? true)))) - (rx/push! drawing-stoper true))] + (swap! drawing-shape drop-last-point) + (rx/push! drawing-stoper true)) + (drop-last-point [shape] + (let [points (:points shape) + points (vec (butlast points))] + (assoc shape :points points :close? true)))] (let [{:keys [x y]} (first points)] [:g (-> (assoc shape :drawing? true)