       (condp = ch
         timer (do (swap! state assoc
                          :suggestions (<! (suggest-fn val))
-                         :loading false)
+                         :loading false
+                         :selected nil)
                   (recur nil))
         in (when new-val (recur new-val))))))
 

                                        (filter #(= (value-fn %) v))
                                        first label-fn)))]
          [:div.re-select-xhr
           #_[:i.search-icon.material-icons "search"]
           [:input.query
            {:type "text"
             :placeholder placeholder
             :on-change handle-input-change
             :on-focus (fn [e] (swap! state assoc
                                      :current-text nil :focused true :suggestions []))
             :value (or (:current-text @state)

   [:div.controls
    {:position :absolute
     :top "2px"
     :color gray-color
     :right (u/px 12)}]

   [:.suggestions
