|
module Updates exposing (update)
|
|
|
|
import Core
|
|
|
|
|
|
update : Core.Msg -> Core.Model -> ( Core.Model, Cmd Core.Msg )
|
|
update msg model =
|
|
case msg of
|
|
Core.Noop ->
|
|
( model, Cmd.none )
|
|
|
|
Core.ReceivedPlaylists playlists ->
|
|
let
|
|
_ =
|
|
Debug.log "p" playlists
|
|
in
|
|
( model, Cmd.none )
|