diff options
author | Joris | 2016-03-27 20:20:10 +0200 |
---|---|---|
committer | Joris | 2016-03-27 20:20:10 +0200 |
commit | 702d60cbcdf85216a1b18416f4480afb77384e8a (patch) | |
tree | 400c004181373255ff0ad40ed32c69674e62ae59 /src/client/elm/LoggedIn/View.elm | |
parent | 5f6c66e4c3cf02e5b1c0a1fac6036b86be06a992 (diff) |
Regroup loggedIn modules
Diffstat (limited to 'src/client/elm/LoggedIn/View.elm')
-rw-r--r-- | src/client/elm/LoggedIn/View.elm | 34 |
1 files changed, 34 insertions, 0 deletions
diff --git a/src/client/elm/LoggedIn/View.elm b/src/client/elm/LoggedIn/View.elm index e69de29..8d4bdbb 100644 --- a/src/client/elm/LoggedIn/View.elm +++ b/src/client/elm/LoggedIn/View.elm @@ -0,0 +1,34 @@ +module LoggedIn.View + ( view + ) where + +import Signal exposing (Address) + +import Html exposing (..) +import Html.Attributes exposing (..) + +import LoggedIn.Model as LoggedInModel + +import Model exposing (Model) +import Model.Payment exposing (Payments) +import Model.Action exposing (Action) + +import View.LoggedIn.AddPayment exposing (addPayment) +import View.LoggedIn.Monthly exposing (monthlyPayments) +import View.LoggedIn.Account exposing (account) +import View.LoggedIn.Table exposing (paymentsTable) +import View.LoggedIn.Paging exposing (paymentsPaging) + +view : Address Action -> Model -> LoggedInModel.Model -> Html +view address model loggedInModel = + div + [ class "loggedIn" ] + [ addPayment address model loggedInModel + , div + [ class "expandables" ] + [ account address model loggedInModel + , monthlyPayments address model loggedInModel + ] + , paymentsTable address model loggedInModel + , paymentsPaging address loggedInModel + ] |