                     (map (partial get urls) ["ogg" "mp3" "wma" "wav"])))
      "href")))
 
-(defn player-view [app owner]
+(defn minimised-queue-view [app owner]
   (reify
     om/IDidMount
     (did-mount [this]

                (recur))))))
    om/IRender
    (render [this]
      (let [on-view (om/observe owner (tab-on-view))]
        (if (= (first on-view) :search)
          (dom/div nil
                   (om/build search-entry-view (:term search)
                             {:init-state {:string ""}})
                   (om/build results-view (:results search))))))))

(defn show-tab [cursor tab-name]
  (om/update! cursor [:tab-on-view] [tab-name]))

      (.pause actual))))


(defn app-view [state owner]
  (reify
    om/IRender
    (render [this]
      (html
       [:div
        [:header {:className "default-primary-color" } "sledge"]
        (om/build search-view (:search state))
        (if (:viewing-queue? state)
          (om/build queue-view state)
          (om/build minimised-queue-view state))]))))

(defn init []
  (add-watch app-state :transport sync-transport)
