From c46a465b9846095e9c5b80ef778b38f1ee0c9ccd Mon Sep 17 00:00:00 2001
From: Eric Dvorsak <eric@dvorsak.fr>
Date: Sat, 2 Sep 2017 02:35:02 +0200
Subject: [PATCH] fix compilation warnings

---
 .../chat/views/input/validation_messages.cljs | 23 ++++++++++---------
 src/status_im/ui/screens/wallet/events.cljs   |  8 +++----
 2 files changed, 16 insertions(+), 15 deletions(-)

diff --git a/src/status_im/chat/views/input/validation_messages.cljs b/src/status_im/chat/views/input/validation_messages.cljs
index de1a7a3219..f580bc3e74 100644
--- a/src/status_im/chat/views/input/validation_messages.cljs
+++ b/src/status_im/chat/views/input/validation_messages.cljs
@@ -1,6 +1,7 @@
 (ns status-im.chat.views.input.validation-messages
-  (:require-macros [status-im.utils.views :refer [defview]])
-  (:require [status-im.components.react :as c]
+  (:require-macros [status-im.utils.views :refer [defview letsubs]])
+  (:require [re-frame.core :as re-frame]
+            [status-im.components.react :as c]
             [status-im.chat.styles.input.validation-message :as style]
             [status-im.utils.listview :as lw]
             [status-im.i18n :as i18n]))
@@ -17,12 +18,12 @@
    markup])
 
 (defview validation-messages-view []
-  [chat-input-margin [:chat-input-margin]
-   input-height [:chat-ui-props :input-height]
-   messages [:chat-ui-props :validation-messages]]
-  (when messages
-    [c/view (style/root (+ input-height chat-input-margin))
-     (if (string? messages)
-       [messages-list [validation-message {:title       (i18n/label :t/error)
-                                           :description messages}]]
-       [messages-list messages])]))
+  (letsubs [chat-input-margin [:chat-input-margin]
+            input-height [:chat-ui-props :input-height]
+            messages [:chat-ui-props :validation-messages]]
+    (when messages
+      [c/view (style/root (+ input-height chat-input-margin))
+       (if (string? messages)
+         [messages-list [validation-message {:title       (i18n/label :t/error)
+                                             :description messages}]]
+         [messages-list messages])])))
diff --git a/src/status_im/ui/screens/wallet/events.cljs b/src/status_im/ui/screens/wallet/events.cljs
index f5ede141a0..7185333fb1 100644
--- a/src/status_im/ui/screens/wallet/events.cljs
+++ b/src/status_im/ui/screens/wallet/events.cljs
@@ -62,9 +62,9 @@
   (assoc-in db [:wallet :wallet/error] err))
 
 (handlers/register-handler-db
- :wallet/clear-error-message
- (fn [db [_]]
-   (update db :wallet dissoc :wallet/error)))
+  :wallet/clear-error-message
+  (fn [db [_]]
+    (update db :wallet dissoc :wallet/error)))
 
 (handlers/register-handler-db
   :update-balance
@@ -84,6 +84,6 @@
 
 (handlers/register-handler-db
   :update-prices-fail
-  (fn [_ [_ err]]
+  (fn [db [_ err]]
     (log/debug "Unable to get prices: " err)
     (set-error-message db :error)))