canceraiddev / elm-pages / Pages.Internal.Platform

Exposed for internal use only (used in generated code).


type alias Flags =
Json.Decode.Value


type alias Model userModel pageData sharedData =
{ key : Browser.Navigation.Key
, url : Url
, contentCache : Pages.ContentCache.ContentCache
, ariaNavigationAnnouncement : String
, pageData : Result String { userModel : userModel
, pageData : pageData
, sharedData : sharedData }
, userFlags : Json.Decode.Value 
}


type Msg userMsg


type alias Program userModel userMsg pageData sharedData =
Platform.Program Flags (Model userModel pageData sharedData) (Msg userMsg)

application : Pages.ProgramConfig.ProgramConfig userMsg userModel route staticData pageData sharedData -> Platform.Program Flags (Model userModel pageData sharedData) (Msg userMsg)