From 889df8caf04de5f10a9e623bab3e502e9573159d Mon Sep 17 00:00:00 2001
From: Joris
Date: Thu, 3 Sep 2015 23:32:39 +0200
Subject: Give the payments count to the client

---
 src/client/Model/View/PaymentView.elm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'src/client/Model/View')

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
   }
-- 
cgit v1.2.3