aboutsummaryrefslogtreecommitdiff
path: root/src/client/LoggedIn/View.elm
diff options
context:
space:
mode:
Diffstat (limited to 'src/client/LoggedIn/View.elm')
-rw-r--r--src/client/LoggedIn/View.elm33
1 files changed, 0 insertions, 33 deletions
diff --git a/src/client/LoggedIn/View.elm b/src/client/LoggedIn/View.elm
deleted file mode 100644
index 4936c6e..0000000
--- a/src/client/LoggedIn/View.elm
+++ /dev/null
@@ -1,33 +0,0 @@
-module LoggedIn.View exposing
- ( view
- )
-
-import Html exposing (..)
-import Html.Attributes exposing (..)
-
-import Page
-
-import Msg exposing (Msg)
-import Model exposing (Model)
-import Model.Translations exposing (getMessage)
-import LoggedData
-
-import LoggedIn.Model as LoggedInModel
-
-import LoggedIn.Home.View as Home
-import LoggedIn.Income.View as Income
-import LoggedIn.Category.View as Categories
-import LoggedIn.Stat.View as Stat
-
-view : Model -> LoggedInModel.Model -> Html Msg
-view model loggedIn =
- div
- [ class "loggedIn" ]
- [ let loggedData = LoggedData.build model.currentTime model.translations model.conf loggedIn
- in case model.page of
- Page.Home -> Home.view loggedData loggedIn.home
- Page.Income -> Income.view loggedData
- Page.Categories -> Categories.view loggedData
- Page.Statistics -> Stat.view loggedData loggedIn.stat
- Page.NotFound -> div [] [ text (getMessage model.translations "PageNotFound") ]
- ]