aboutsummaryrefslogtreecommitdiff
path: root/src/client/View/LoggedIn/Monthly.elm
diff options
context:
space:
mode:
Diffstat (limited to 'src/client/View/LoggedIn/Monthly.elm')
-rw-r--r--src/client/View/LoggedIn/Monthly.elm3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/client/View/LoggedIn/Monthly.elm b/src/client/View/LoggedIn/Monthly.elm
index 715288b..6d30e4a 100644
--- a/src/client/View/LoggedIn/Monthly.elm
+++ b/src/client/View/LoggedIn/Monthly.elm
@@ -38,12 +38,13 @@ monthlyPayments model loggedInView =
monthlyCount : Model -> Monthly -> Html
monthlyCount model monthly =
let count = List.length monthly.payments
+ total = List.sum << List.map .cost <| monthly.payments
key = if count > 1 then "PluralMonthlyCount" else "SingularMonthlyCount"
in button
[ class "count"
, onClick actions.address (UpdateLoggedIn << UpdateMonthly <| ToggleDetail)
]
- [ text (getParamMessage [toString count] key model.translations)
+ [ text (getParamMessage [toString count, toString total] key model.translations)
, div
[ class "expand" ]
[ if monthly.visibleDetail