31 lines
564 B
Elm
31 lines
564 B
Elm
|
module Main exposing (main)
|
||
|
|
|
||
|
|
import Browser
|
||
|
|
import Core
|
||
|
|
import Json.Decode as Decode
|
||
|
|
import Updates
|
||
|
|
import Url
|
||
|
|
import Views
|
||
|
|
|
||
|
|
|
||
|
|
main : Program Decode.Value Core.Model Core.Msg
|
||
|
|
main =
|
||
|
|
Browser.application
|
||
|
|
{ init = Core.init
|
||
|
|
, update = Updates.update
|
||
|
|
, view = Views.view
|
||
|
|
, subscriptions = \_ -> Sub.none
|
||
|
|
, onUrlChange = onUrlChange
|
||
|
|
, onUrlRequest = onUrlRequest
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
onUrlChange : Url.Url -> Core.Msg
|
||
|
|
onUrlChange _ =
|
||
|
|
Core.Noop
|
||
|
|
|
||
|
|
|
||
|
|
onUrlRequest : Browser.UrlRequest -> Core.Msg
|
||
|
|
onUrlRequest _ =
|
||
|
|
Core.Noop
|