Move logged data to LoggedIn component

1 files changed, 16 insertions, 1 deletions

diff --git a/src/client/elm/LoggedIn/Model.elm b/src/client/elm/LoggedIn/Model.elm
index a86b464..90f1b2b 100644
--- a/src/client/elm/LoggedIn/Model.elm
+++ b/src/client/elm/LoggedIn/Model.elm
@@ -3,15 +3,30 @@ module LoggedIn.Model
   , init
   ) where
 
+import Time exposing (Time)
+
 import Model.Init exposing (..)
+import Model.Payment exposing (Payments)
+import Model.User exposing (Users, UserId)
+import Model.Income exposing (Incomes)
 
 import LoggedIn.Home.Model as HomeModel
 
 type alias Model =
   { home : HomeModel.Model
+  , users : Users
+  , me : UserId
+  , payments : Payments
+  , monthlyPayments : Payments
+  , incomes : Incomes
   }
 
 init : Init -> Model
 init initData =
-  { home = HomeModel.init initData
+  { home = HomeModel.init
+  , users = initData.users
+  , me = initData.me
+  , payments = initData.payments
+  , monthlyPayments = initData.monthlyPayments
+  , incomes = initData.incomes
   }