       [:h2 "Library"]
       [:form#library-search.pure-form
         [:input.pure-input-3-4 {:type "text"
-                           :id "query"
-                           :placeholder "Search trough the library..."
-                           :value (@app-state :query)
-                           :on-change on-query-change}]
+                               :id "query"
+                               :placeholder "Search trough the library..."
+                               :value (@app-state :query)
+                               :on-change on-query-change}]
         [:span.pure-input-1-4 (str "Tracks: " (count tracks))]]
       [:table.pure-table.pure-table-striped
         [:thead


(defn sorting-th [field caption]
  [:th {:on-click #(update-sort-field! field)}
   caption
   [:span.sorting-arrow (when (= field (@app-state :sort-field))
                          (if (@app-state :ascending)
                            " ▲"
                            " ▼"))]])

(defn library-section []
  (let [tracks (@app-state :library)]


(defn header []
  (let [cursor  (r/cursor app-state [:info])
                title   (@cursor :name)
                message (@cursor :greet_message)]
    [:header
      [:h1 title]
      [:p message]]))

;; -------------------------
;; Player
