diff options
Diffstat (limited to 'src/client/Model')
| -rw-r--r-- | src/client/Model/View/PaymentView.elm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/src/client/Model/View/PaymentView.elm b/src/client/Model/View/PaymentView.elm index 19ad355..117be59 100644 --- a/src/client/Model/View/PaymentView.elm +++ b/src/client/Model/View/PaymentView.elm @@ -12,15 +12,17 @@ type alias PaymentView = { userName : String , add : AddPayment , payments : Payments + , paymentsCount : Int , payers : Payers , edition : Maybe Edition } -initPaymentView : String -> Payments -> Payers -> PaymentView -initPaymentView userName payments payers = +initPaymentView : String -> Payments -> Int -> Payers -> PaymentView +initPaymentView userName payments paymentsCount payers = { userName = userName , add = initAddPayment , payments = payments + , paymentsCount = paymentsCount , payers = payers , edition = Nothing } |