                             [:thead
                              [:tr
                               (for [col (:header opts)]
-                                [:th (:label col) (str " (" (:field col) ")")])]]
+                                [:th (:label col) (str " (" (string/join "/" (:field col))")")])]]
                             [:tbody
                              (let [hits (get-in query-result [:hits :hits])]
                                (for [hit hits]
                                  [:tr
                                   (for [col (:header opts)]
-                                    [:td (-> hit :_source (get (-> col :field keyword)))])]))]]]]
+                                    [:td (get-in hit (map keyword (:field col)))])]))]]]]
                          [:.card-reveal
                           [:span.card-title.grey-text.text-darken-4 "metadata"
                            [:i.mdi-navigation-close.right]

  [owner result]
  (om/set-state! owner :query-result result))

(defcomponent searchbox [cursor owner opts]
  (will-mount [_]
              (update-searchbox owner "")

                                                            (update-searchbox owner "")
                                                            (update-query-result owner {}))
                                                       13 (go ;; ENTER
                                                           (let [resp (<! (es-query
                                                                           (join-str "es" (:es-index opts) (:es-type opts) "_search")
                                                                           query))]
                                                             (update-query-result owner resp)))
                                                       nil)))}]
                           [:label {:for (:id opts)} "query string"]]
                          [:div "query"
                           [:pre {:style {:font-size "8pt"}}
                            [:code.json {:ref "current-query-string"} (.stringify js/JSON (clj->js query) nil 4)]]]
