aboutsummaryrefslogtreecommitdiff
path: root/src/client/Model/View/LoggedView.elm
diff options
context:
space:
mode:
authorJoris2015-09-06 00:05:50 +0200
committerJoris2015-09-06 00:05:50 +0200
commit24633871359ec9fbd63fdfebf79a6351b2792f77 (patch)
treea87c8a964a3c5114da13e622c604cf99ab905a06 /src/client/Model/View/LoggedView.elm
parent8c328987901973cd0ffd2e03cae547717ebbbc67 (diff)
downloadbudget-24633871359ec9fbd63fdfebf79a6351b2792f77.tar.gz
budget-24633871359ec9fbd63fdfebf79a6351b2792f77.tar.bz2
budget-24633871359ec9fbd63fdfebf79a6351b2792f77.zip
Can add monthly payments, not visible at the moment though, just the count is printed
Diffstat (limited to 'src/client/Model/View/LoggedView.elm')
-rw-r--r--src/client/Model/View/LoggedView.elm8
1 files changed, 5 insertions, 3 deletions
diff --git a/src/client/Model/View/LoggedView.elm b/src/client/Model/View/LoggedView.elm
index 35fd9e5..34a55a2 100644
--- a/src/client/Model/View/LoggedView.elm
+++ b/src/client/Model/View/LoggedView.elm
@@ -13,6 +13,7 @@ type alias LoggedView =
{ users : Users
, me : UserId
, add : AddPayment
+ , monthlyPayments : Payments
, payments : Payments
, paymentsCount : Int
, payers : Payers
@@ -20,11 +21,12 @@ type alias LoggedView =
, currentPage : Int
}
-initLoggedView : Users -> UserId -> Payments -> Int -> Payers -> LoggedView
-initLoggedView users me payments paymentsCount payers =
+initLoggedView : Users -> UserId -> Payments -> Payments -> Int -> Payers -> LoggedView
+initLoggedView users me monthlyPayments payments paymentsCount payers =
{ users = users
, me = me
- , add = initAddPayment
+ , add = initAddPayment Punctual
+ , monthlyPayments = monthlyPayments
, payments = payments
, paymentsCount = paymentsCount
, payers = payers