Add type alias for Flags.

This commit is contained in:
Dillon Kearns 2019-07-22 15:59:37 -07:00
parent d7e0534dbb
commit f2652d4df1

View File

@ -13,7 +13,11 @@ import MarkParser
import Url exposing (Url)
main : Program () Model Msg
type alias Flags =
()
main : Program Flags Model Msg
main =
Browser.application
{ init = init
@ -31,7 +35,7 @@ type alias Model =
}
init : () -> Url.Url -> Nav.Key -> ( Model, Cmd Msg )
init : Flags -> Url.Url -> Nav.Key -> ( Model, Cmd Msg )
init flags url key =
( Model key url, Cmd.none )