diff options
Diffstat (limited to 'src/client/Model/View')
| -rw-r--r-- | src/client/Model/View/LoggedView.elm (renamed from src/client/Model/View/PaymentView.elm) | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/client/Model/View/PaymentView.elm b/src/client/Model/View/LoggedView.elm index 93ab457..35fd9e5 100644 --- a/src/client/Model/View/PaymentView.elm +++ b/src/client/Model/View/LoggedView.elm @@ -1,6 +1,6 @@ -module Model.View.PaymentView - ( PaymentView - , initPaymentView +module Model.View.LoggedView + ( LoggedView + , initLoggedView ) where import Model.User exposing (Users, UserId) @@ -9,7 +9,7 @@ import Model.Payers exposing (Payers) import Model.View.Payment.Add exposing (..) import Model.View.Payment.Edition exposing (..) -type alias PaymentView = +type alias LoggedView = { users : Users , me : UserId , add : AddPayment @@ -20,8 +20,8 @@ type alias PaymentView = , currentPage : Int } -initPaymentView : Users -> UserId -> Payments -> Int -> Payers -> PaymentView -initPaymentView users me payments paymentsCount payers = +initLoggedView : Users -> UserId -> Payments -> Int -> Payers -> LoggedView +initLoggedView users me payments paymentsCount payers = { users = users , me = me , add = initAddPayment |