diff --git a/app/src/Details.elm b/app/src/Details.elm index 913532e..418b22e 100644 --- a/app/src/Details.elm +++ b/app/src/Details.elm @@ -811,7 +811,7 @@ getPage model page = view : Model -> Native Msg view model = model.rootFrame - |> Frame.frame [] (getPage model) + |> Frame.view [] (getPage model) decodeCar : D.Decoder Car diff --git a/app/src/Flick.elm b/app/src/Flick.elm index cda4f02..9cb6fc3 100644 --- a/app/src/Flick.elm +++ b/app/src/Flick.elm @@ -371,7 +371,7 @@ getPage model page = view : Model -> Native Msg view model = model.rootFrame - |> Frame.frame [] (getPage model) + |> Frame.view [] (getPage model) subscriptions : Model -> Sub Msg diff --git a/elm-native/src/Native/Frame.elm b/elm-native/src/Native/Frame.elm index 93a06fa..6cf177c 100644 --- a/elm-native/src/Native/Frame.elm +++ b/elm-native/src/Native/Frame.elm @@ -3,7 +3,7 @@ module Native.Frame exposing , TransitionCurve(..) , TransitionName(..) , defaultNavigationOptions - , frame + , view , goBack , goTo , handleBack @@ -207,8 +207,8 @@ setClearHistory val mod = { mod | clearHistory = Just val } -frame : List (Attribute msg) -> (page -> Html msg) -> Model page -> Html msg -frame attrs getPage frameModel = +view : List (Attribute msg) -> (page -> Html msg) -> Model page -> Html msg +view attrs getPage frameModel = let children = [ getPage frameModel.current ]