From 9ede688b6eebafd269a831b9f2c1ea3cd5c0972d Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Alejandro=20G=C3=B3mez?= <alejandro@dialelo.com>
Date: Wed, 17 Feb 2016 20:11:24 +0100
Subject: [PATCH] Extract event handlers to local bindings

---
 src/uxbox/ui/dashboard/projects.cljs | 29 +++++++++++++++-------------
 1 file changed, 16 insertions(+), 13 deletions(-)

diff --git a/src/uxbox/ui/dashboard/projects.cljs b/src/uxbox/ui/dashboard/projects.cljs
index d7ac9a9105..11e1b4840b 100644
--- a/src/uxbox/ui/dashboard/projects.cljs
+++ b/src/uxbox/ui/dashboard/projects.cljs
@@ -164,12 +164,13 @@
 
 (defn project-sort-render
   []
-  (let [ordering (rum/react project-ordering-l)]
+  (let [ordering (rum/react project-ordering-l)
+        change-order #(rs/emit! (dd/set-project-ordering (keyword (.-value (.-target %)))))]
     (html
      [:div
        [:span (tr "ds.project-ordering")]
        [:select.input-select
-        {:on-change #(rs/emit! (dd/set-project-ordering (keyword (.-value (.-target %)))))
+        {:on-change change-order
          :value (name ordering)}
         (for [option (keys +ordering-options+)
               :let [option-id (get +ordering-options+ option)
@@ -188,17 +189,19 @@
 
 (defn project-search-render
   []
-  (html
-    [:form
-     [:input
-      {:type "text"
-       :on-change #(rs/emit! (dd/set-project-filtering (.-value (.-target %))))
-       :auto-focus true
-       :value (rum/react project-filtering-l)}]
-     [:input
-      {:type "button"
-       :on-click #(rs/emit! (dd/clear-project-filtering))
-       :value "X"}]]))
+  (let [change-term #(rs/emit! (dd/set-project-filtering (.-value (.-target %))))
+        clear-term #(rs/emit! (dd/clear-project-filtering))]
+    (html
+     [:form
+      [:input
+       {:type "text"
+        :on-change change-term
+        :auto-focus true
+        :value (rum/react project-filtering-l)}]
+      [:input
+       {:type "button"
+        :on-click clear-term
+        :value "X"}]])))
 
 (def project-search
   (mx/component