   (let [this (r/current-component)]
     [ui/touchable-highlight {:style {:margin-left 5
                                      :margin-right 5}
+                             :underlay-color "#cccccc"
                              :on-press #(do
                                           (.setNativeProps @input #js{:text ""})
                                           (.dismiss (.-Keyboard ui/ReactNative))
                                           (dispatch [:send-message]))}
-     [ui/icon {:name "send" :size 36 :color "deepskyblue" :margin-right 8}]]))
+     [ui/icon {:name "send"
+               :size 36
+               :color "deepskyblue"
+               :margin-right 8}]]))
 
 (defn ChatScreen [_]
   (let [this (r/current-component)

   [re-frame.loggers :as rf.log]
   [mobile-patient.ui :as ui]
   [clojure.spec.alpha :as s]
   [mobile-patient.db :as db :refer [app-db]]))

(def warn (js/console.warn.bind js/console))

;; -- Views----------------------------------------------------------

(def ds (ui/ReactNative.ListView.DataSource. #js{:rowHasChanged (fn[a b] false)}))
(def font-size 18)

(def chat-row-comp
  (r/reactify-component
