        nil
        "Mina tävlingar")
       (dom/table
-       nil
+       #js {:className "table table-hover"}
        (dom/thead
         nil
         (dom/tr
          nil
          (dom/th nil "Namn")
          (dom/th nil "Plats")))
-       (apply dom/tbody nil (map competition competitions)))))))
+       (apply dom/tbody nil (map competition competitions)))
+
+      
+      (dom/div
+       nil
+       (dom/span #js {:className "btn btn-default btn-file"} "Importera.."
+                 (dom/input #js {:type "file" :onChange #(on-click-import-file %)})))))))
 
 ;;;;;;;;;;;;;;;;;;;;
 ;; Classes

(defn log [m]
  (.log js/console m))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Init DB
(defonce conn (d/create-conn uidb/schema))

(defn init-app []
  (d/transact! conn [{:db/id -1 :app/id 1}
                     {:db/id -1 :selected-page :competitions}
                     ;{:db/id -1 :app/selected-competition {}}
                     ]))

(defn app-started? [conn]
  (not
   (empty? (d/q '[:find ?e
                  :where
                  [?e :app/id 1]] (d/db conn)))))

(log conn)
;;  (d/q '[:find [(pull ?c [:class/name]) ...] 
;;         :where
;;         [?e :competition/name "A"]
;;         [?e :competition/classes ?c]]
;;       (d/db conn)))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; Sente Socket setup


   (let [competition (om/props this)
         name (:competition/name competition)]
     (dom/tr
      ;; TODO - this should be handle be some remote mechanism
      #js {:onClick #(do
                       (chsk-send! [:event-manager/query ['[*] [:competition/name name]]])
                       (om/transact! this `[(app/select-competition {:name ~name})]))}
      (dom/td nil name)
      (dom/td nil (:competition/location competition))))))

