aboutsummaryrefslogtreecommitdiff
path: root/src/frontend/tau/views/player.cljs
blob: 732e542fd1b86cc2cf5d0832b455cda0e7d1c515 (plain)
1
2
3
4
5
6
7
8
9
10
11
(ns tau.views.player
  (:require
   [re-frame.core :as rf]))

(defn global-player
  []
  (let [global-stream @(rf/subscribe [:global-stream])
        show-global-player? @(rf/subscribe [:show-global-player])]
    [:div
     [:audio {:src global-stream
              :class (when-not show-global-player? "hidden")}]]))