     om/IInitState
     (init-state [_]
       {:text ""
-       :highlighted-result-index -1 })
+       :highlighted-result-index -1})
     om/IRenderState
     (render-state [_ {:keys [text highlighted-result-index] :as state}]
       (let [clear-tags! (fn []

                               (fn [e]
                                 (cond
                                   ; enter when autocomplete -> tag
                                   (and (= 13 e.keyCode) autocomplete-open?)
                                   (do
                                     (.preventDefault e)
                                     (when-let [tag (nth results highlighted-result-index nil)]

                                                               :id (tag :id)})
                                       (close-autocomplete!)))
                                   ; enter otherwise -> message
                                   (and (= KeyCodes.ENTER e.keyCode) (= e.shiftKey false))
                                   (do
                                     (.preventDefault e)
                                     (dispatch! :new-message {:thread-id (config :thread-id)
                                                              :content text})
                                     (clear-text!))

                                   (= KeyCodes.ESC e.keyCode)
                                   (do
                                     (close-autocomplete!))

                                   (= KeyCodes.UP e.keyCode)
                                   (do
                                     (.preventDefault e)
                                     (highlight-prev!))

                                   (= KeyCodes.DOWN e.keyCode)
                                   (do
                                     (.preventDefault e)
                                     (highlight-next!))
