        [track-component track]])]])
 
 (defn playlist-component []
-  [:div.playlist
+  [:section#playlist
    [:h2 "Playlist"]
    [now-playing-component]
    [next-component]])

  (swap! state assoc :query (-> e .-target .-value)))

(defn search-component []
  [:div.search
   [:span "Serach:"]
   [:input {:type "text"
            :value (@state :query)
            :on-change on-query-change}]])

(defn library-component []
  [:div.library
   [:h2 "Library"]
   [search-component]
   [:ul (for [track (@state :library)]

     "-")])

(defn now-playing-component []
  [:p
   [:span "Now playing:"]
   [track-component (get-in @state [:playlist "current"])]])

(defn next-component []
  [:section
   [:span "Next:"]
   [:ul
    (for [track (get-in @state [:playlist "next"])]
