 (defn options-list [options label-fn on-change]
   (let [opts (if (instance? reagent.ratom/Reaction options) @options options)]
     [:div
-     (for [i opts]
-       [:div.option
-        {:key (pr-str i)
-         :on-click (fn [_] (on-change i))}
-        (label-fn i)])]))
+     (if (empty? opts)
+       [:div.no-results "No results"]
+       (for [i opts]
+         [:div.option
+          {:key (pr-str i)
+           :on-click (fn [_] (on-change i))}
+          (label-fn i)]))]))
 
 (defn select [{:keys [on-search debounce-interval on-blur]}]
   (let [state (r/atom {:active false})

   [:.re-search-search
    {:border border
     :width "100%"
     :padding [[0 (u/px w)]]
     :border-radius (u/px radius)
     :line-height (u/px* h3)}

     :border "1px solid #ddd"}
    [:&.no-input
     {:top (u/px+ 10 (+ 16 (* h 1.5)))}]
    [:.no-results
     {:text-align :center
      :padding (u/px 10)
      :color :gray}]
    [:.option {:cursor "pointer"
               :display "block"
               :padding-left (u/px h)
