            (not= "!" message))
       (pos? (count staged-commands))))
 
-(defn try-send [staged-commands message]
+(defn try-send [staged-commands message dismiss-keyboard]
   (when (message-valid? staged-commands message)
-    (send)))
+    (send dismiss-keyboard)))
 
 (defn plain-message-input-view [{:keys [command input-options validator]}]
   (let [input-message (subscribe [:get-chat-input-text])

            [status-im.components.react :refer [view
                                                icon
                                                touchable-highlight
                                                text-input]]
            [status-im.chat.views.suggestions :refer [suggestions-view]]
            [status-im.chat.views.content-suggestions :refer [content-suggestions-view]]
            [status-im.chat.views.command :as command]

(defn set-input-message [message]
  (dispatch [:set-chat-input-text message]))

(defn send [dismiss-keyboard]
  (when dismiss-keyboard
    (dismiss-keyboard!))
  (dispatch [:send-chat-msg]))

(defn message-valid? [staged-commands message]
