diff options
Diffstat (limited to 'src/client/elm/View.elm')
-rw-r--r-- | src/client/elm/View.elm | 16 |
1 files changed, 7 insertions, 9 deletions
diff --git a/src/client/elm/View.elm b/src/client/elm/View.elm index 00833cb..4a0822f 100644 --- a/src/client/elm/View.elm +++ b/src/client/elm/View.elm @@ -14,6 +14,7 @@ import Dialog import Tooltip import View.Header as Header +import View.Errors as Errors import SignIn.View as SignInView import LoggedIn.View as LoggedInView @@ -25,15 +26,12 @@ view model = div [] [ Header.view model - , mainView model + , case model.view of + SignInView signIn -> + SignInView.view model signIn + LoggedInView loggedIn -> + LoggedInView.view model loggedIn + , Errors.view model.translations model.errors , Dialog.view model.dialog , Html.map Msg.Tooltip <| Tooltip.view model.tooltip ] - -mainView : Model -> Html Msg -mainView model = - case model.view of - SignInView signIn -> - SignInView.view model signIn - LoggedInView loggedIn -> - LoggedInView.view model loggedIn |