        [user-name-and-avatar]
        (panels @active-panel)
        ])))
+
+(defn main-panel []
+  (fn []
+    [:div
+     [loading-throbber]
+     [table]]))

        [:tbody [tbody]]
        ]])))

(defn main-panel []
  (fn []
    [:div
     [table]]))

(defn loading-throbber
  []
  (let [loading? (re-frame/subscribe [:loading?])]
    (when @loading?
      [:div.loading
       [:div.three-quarters-loader "Loading..."]])))

(defn github-id-input
  []

                 ]
             (for [v [id salary abbrev]]
               [:td (conj {:key (str "tr-" i "-" v)}
                          {:style {:border "1px" :borderStyle "solid"}}
                          {:on-click #(when-not @loading?
                                        (println "on-click" v))})
                v]))])
        @emps)])))

