           (apply dom/div #js {:className "results tracks" }
                  (dom/div #js {:className "track"}
                           (dom/span {:id "queue-all-tracks"}
-                                    "Queue all tracks"}
+                                    "Queue all tracks")
                           button)
                  track-components)
           (apply dom/div #js {:className "results tracks" }

       :dequeue (chan)})
    om/IRenderState
    (render-state [this state]
      (let [bits (best-media-url (first (:player-queue app)))
            w (.-innerWidth js/window)]
        (om/update! app :device-type (condp > w
                                       480 :phone
                                       600 :tablet
                                       :desktop))
        (dom/div nil
                 (om/build filters-view app
                           {:init-state state})
                 (dom/h2 nil "results")
                 (om/build results-view app {:init-state state})
                 (dom/h2 nil "queue")
                 (om/build queue-view app {:init-state state})
                 (om/build player-view app {:init-state state})
                 )))))

(defn init []
  (let [el (. js/document (getElementById "om-app"))]

                                 })
                 )))))

(defn detect-platform []
  (let [w (.-innerWidth js/window)]
    (condp > w
      480 :phone
      600 :tablet
      :desktop)))

(defn app-view [app owner]
  (reify
    om/IInitState
