From b734f303fb4108884826c6b1e12b90c47990f2a1 Mon Sep 17 00:00:00 2001
From: Andrey Antukh <niwi@niwi.nz>
Date: Mon, 11 Apr 2016 18:12:15 +0300
Subject: [PATCH] Cosmetic improvements.

---
 src/uxbox/ui/workspace/header.cljs | 12 +++++-------
 1 file changed, 5 insertions(+), 7 deletions(-)

diff --git a/src/uxbox/ui/workspace/header.cljs b/src/uxbox/ui/workspace/header.cljs
index 5f3159357a..f09ca522ca 100644
--- a/src/uxbox/ui/workspace/header.cljs
+++ b/src/uxbox/ui/workspace/header.cljs
@@ -33,7 +33,9 @@
   (let [zoom (rum/react wb/zoom-l)
         coords (some-> (rum/react wb/mouse-canvas-a)
                        (gpt/divide zoom)
-                       (gpt/round 1))]
+                       (gpt/round 1))
+        increase #(rs/emit! (dw/increase-zoom))
+        decrease #(rs/emit! (dw/decrease-zoom))]
     (html
      [:ul.options-view
       [:li.coordinates {:alt "x"}
@@ -41,13 +43,9 @@
       [:li.coordinates {:alt "y"}
        (str "Y: " (:y coords "-"))]
       [:li.zoom-input
-       [:span.add-zoom
-        {:on-click #(rs/emit! (dw/increase-zoom))}
-        "+"]
+       [:span.add-zoom {:on-click increase} "+"]
        [:span (str (mth/round (* 100 zoom)) "%")]
-       [:span.remove-zoom
-        {:on-click #(rs/emit! (dw/decrease-zoom))}
-        "-"]]])))
+       [:span.remove-zoom {:on-click decrease} "-"]]])))
 
 (def coordinates
   (mx/component