         data (rest data)]
     (into [] 
           (for [line data]
-              (into {} 
-                    (for [[k v] 
-                          (map list headers line)]
-                      [k (clojure.string/trim v)]))))))
+            (into {} 
+                  (for [[k v] 
+                        (map list headers line)]
+                    [k (clojure.string/trim v)]))))))
 
 (defn- load-file-handler
   []

(defn competitor-panel
  []
  (let [competitors (subscribe [:competitors])
        col-widths {:name "15em" :gender "4em" :club "15em" :yob "4em" :belt "4.5em" :actions "4.5em"}]
    (fn []
      [v-box 
       :gap "10px"

(defn data-table
  []
  (let [mouse-over (reagent/atom nil)
        click-msg  (reagent/atom "")
        sort-key   (reagent/atom :fname)
        label-fn   (fn [label-str label-key col-widths]
                     [h-box 
                      :gap "2px"
                      :width (label-key col-widths)
                      :children 
                      [[label 
                        :label label-str]
                       [row-button
                        :md-icon-name "md-sort"
                        :tooltip (str "sort on " label-str)
                        :on-click #(reset! sort-key label-key)]]])
        sort-fn    (fn [key]
                     (case key
                       :name #(.full-name %)
                       :belt #(case (:belt %)
                                "White"  1
                                "Blue"   2
                                "Purple" 3
                                "Brown"  4
                                "Black"  5
                                6)
                       :club #(:name (:club %))
                       key))]
    (fn [rows col-widths]
      [v-box
       :align    :start
