   (let [doc-source (:_source doc)]
     {:id (:wbid doc-source)
      :class (clojure.string/replace (:_type doc) "-" "_")
-     :label (:label doc-source)
+     :label (or (:label doc-source)
+                (:wbid doc-source))
      :taxonomy (:species doc-source)}))
 
 (defn- get-obj [doc]

        doc-source (:_source doc)]
    {:name search-obj
     :description (:description doc-source)
     :taxonomy nil}))

(defn wrap-params [handler]
  (fn [request]

                                       (Integer.)
                                       (dec)
                                       (* page-size))
                            :q (-> (get params :q (:query params))
                                   (clojure.string/replace #"\*" ""))
                            :type (get params :type (:class params))
                            :species (:species params)
                            :raw params)]
