From 1e47a7754ca38bd1a6c74765d8378caf68ce4619 Mon Sep 17 00:00:00 2001 From: Joris Date: Sun, 26 Mar 2017 21:10:42 +0200 Subject: Separate client and server watch --- src/client/View.elm | 36 ++++++++++++++++++++++++++++++++++++ 1 file changed, 36 insertions(+) create mode 100644 src/client/View.elm (limited to 'src/client/View.elm') diff --git a/src/client/View.elm b/src/client/View.elm new file mode 100644 index 0000000..66c498a --- /dev/null +++ b/src/client/View.elm @@ -0,0 +1,36 @@ +module View exposing + ( view + ) + +import Html exposing (..) +import Html.Attributes exposing (..) + +import Model exposing (Model) +import Msg exposing (Msg) +import Model.View exposing (..) +import LoggedData +import Dialog +import Tooltip + +import View.Header as Header +import View.Errors as Errors + +import SignIn.View as SignInView +import LoggedIn.View as LoggedInView + +import Utils.Maybe as Maybe + +view : Model -> Html Msg +view model = + div + [] + [ Header.view 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 + ] -- cgit v1.2.3