From 76f8b85eb9f796d6df861a04f702ef5f48630795 Mon Sep 17 00:00:00 2001 From: Joris Date: Tue, 29 Mar 2016 23:46:47 +0200 Subject: Move logged data to LoggedIn component --- src/client/elm/LoggedIn/Model.elm | 17 ++++++++++++++++- 1 file changed, 16 insertions(+), 1 deletion(-) (limited to 'src/client/elm/LoggedIn/Model.elm') 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 } -- cgit v1.2.3