changed parameter order of frame

This commit is contained in:
hariroshan 2023-02-25 21:56:03 +05:30
parent b235db9970
commit f736ac0b48
3 changed files with 9 additions and 10 deletions

View File

@ -810,9 +810,8 @@ getPage model page =
view : Model -> Native Msg
view model =
Frame.frame []
model.rootFrame
(getPage model)
model.rootFrame
|> Frame.frame [] (getPage model)
decodeCar : D.Decoder Car
@ -853,7 +852,9 @@ encodeCar car =
]
|> E.object
{-| We can use elm/http too! -}
{-| We can use elm/http too!
-}
response : List Car
response =
"""

View File

@ -370,10 +370,8 @@ getPage model page =
view : Model -> Native Msg
view model =
Frame.frame []
model.rootFrame
(getPage model)
model.rootFrame
|> Frame.frame [] (getPage model)
subscriptions : Model -> Sub Msg

View File

@ -207,8 +207,8 @@ setClearHistory val mod =
{ mod | clearHistory = Just val }
frame : List (Attribute msg) -> Model page -> (page -> Html msg) -> Html msg
frame attrs frameModel getPage =
frame : List (Attribute msg) -> (page -> Html msg) -> Model page -> Html msg
frame attrs getPage frameModel =
let
children =
[ getPage frameModel.current ]