minimal-webplayer/src/Msg.elm

module Msg exposing (..)

import Http
import Video


type Msg
    = NoOp
    | VideoSelected String
    | VideoListLanded (Result Http.Error (List Video.Video))
Refactor 2021-03-23 15:25:08 +00:00			`module Msg exposing (..)`

			`import Http`
			`import Video`

Fix: load() on video select + telm-format 2021-03-29 07:53:57 +00:00
Refactor 2021-03-23 15:25:08 +00:00			`type Msg`
Fix: load() on video select + telm-format 2021-03-29 07:53:57 +00:00			`= NoOp`
			`\| VideoSelected String`
			`\| VideoListLanded (Result Http.Error (List Video.Video))`