 
 (register-handler 
  :start 
- [player-mw]
+ [trim-v]
  start)
 
 (defn stop [db [_]]


(register-handler 
 :stop 
 player-mw
 stop)

(register-handler 
 :toggle-play 
 player-mw
 (fn [db [_]] 
   (if (= (:playstate db) :stopped)
     (start db [])
     (stop db []))))



(def ->ls (after db/db->ls!))

(def player-mw [(path :player)
                trim-v])
(def controls-mw [(path :controls)
                  trim-v])

(def channel-mw [->ls
                 (path :channels)
                 trim-v])

(def playstates {:stopped "Stopped"
