   "Wrapper for font-awesome icons."
   ([class]
    (dom/i #js {:react-key (lib/get-unique-key)
-               :key       (lib/get-unique-key)
                :className (str "fa " class)}))
   ([class f]
    (println f)
    (dom/i #js {:react-key (lib/get-unique-key)
-               :key       (lib/get-unique-key)
                :className (str "pointer fa " class)
                :onClick   f})))
 

  "Reusable components, which use twitter bootstrap to reduce redundancy."
  (:require [om.next :as om :refer-macros [defui]]
            [om.dom :as dom :include-macros true]
            [cruncher.utils.lib :as lib]))

(defn sortable-table-header

                           :onClick #(lib/change-view! :login)}
                      (fa-icon "fa-sign-out")
                      " Login")))))
(def login-indicator (om/factory LoggedIn))

(defui BackToTop
  Object
  (render [this]
    (dom/div #js {:className (str "scrolltop")
                  :onClick   #(.scroll js/window 0 0)}
             (dom/div #js {:className "scroll icon"}
                      (fa-icon "fa-angle-up")))))
(def back-to-top (om/factory BackToTop))