             track (queue-current-entry queue)]
         (html
          [:div {:id "transport"
-                :onClick #(om/transact! app [:viewing-queue?] not)
+                :onClick #(om/transact! wanted [:viewing-queue?] not)
                 }
           [:span {:className "index"}
            [:span {:className "current"} (:next-track queue)]

(defn player-el []
  (aget (.getElementsByTagName js/document "audio") 0))

(defn transport-buttons-view [app owner]
  (reify
    om/IRender
    (render [this]
      (let [wanted (:player app)
            queue (:queue wanted)
            actual (player-el)
            want-play (:playing (:audio-el wanted))
            actually-playing (and actual (not (.-paused actual)))

       [:div
        [:header {:className "default-primary-color" } "sledge"]
        (om/build search-view (:search state))
        (if (:viewing-queue? (:player state))
          [:div {:className "queue queue-open tracks" }
           (om/build queue-view (:queue (:player state)))]
          [:div {:className "queue tracks" } " "])
        (om/build transport-buttons-view (:player state))
        (om/build audio-el (:audio-el (:player state)))
        ]))))

