Separate client and server watch

1 files changed, 36 insertions, 0 deletions

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
+    ]