Rename Msg.

This commit is contained in:
Dillon Kearns 2021-04-21 07:09:09 -07:00
parent 0634bc84b2
commit 8f3eb14195

View File

@ -258,7 +258,7 @@ type Msg userMsg
| UpdateCacheAndUrl Url (Result Http.Error ( Url, ContentJson, ContentCache ))
| PageScrollComplete
| HotReloadComplete ContentJson
| StartingHotReload
| NoOp
type alias Model userModel pageStaticData sharedStaticData =
@ -507,7 +507,7 @@ update config appMsg model =
, Cmd.none
)
StartingHotReload ->
NoOp ->
( model, Cmd.none )
@ -544,7 +544,7 @@ application config =
Err _ ->
-- TODO should be no message here
StartingHotReload
NoOp
)
]
@ -558,7 +558,7 @@ application config =
Err _ ->
-- TODO should be no message here
StartingHotReload
NoOp
)
, onUrlChange = UrlChanged
, onUrlRequest = LinkClicked