 
 (defn next-component []
   [:section
-   [:span "Next:"]
-   [:ul
-    (for [track (@app-state :playlist)]
-      [:li
-       [playlist-remove-component track]
-       [track-component track]])]])
+   [tracks-table (@app-state :playlist) playlist-remove-component]])
 
 (defn playlist-component []
   [:section#playlist
    [:h2 "Playlist"]
    [now-playing-component]
-   [next-component]])
+   [tracks-table (@app-state :playlist) playlist-remove-component]])
 
 (defn on-query-change [e]
   ;(get-library!)

     (str " " (:artist track) " - " (:title track))
     "-")])

(defn now-playing-component []
  [:p
   [:span "Now playing:"]

  [:section#library
   [:h2 "Library"]
   [search-component]
   [tracks-table (@app-state :library) playlist-remove-component]])

(defn page-component []
  [:main
