aboutsummaryrefslogtreecommitdiff
path: root/src/client/elm/Update/LoggedIn/Monthly.elm
diff options
context:
space:
mode:
Diffstat (limited to 'src/client/elm/Update/LoggedIn/Monthly.elm')
-rw-r--r--src/client/elm/Update/LoggedIn/Monthly.elm8
1 files changed, 4 insertions, 4 deletions
diff --git a/src/client/elm/Update/LoggedIn/Monthly.elm b/src/client/elm/Update/LoggedIn/Monthly.elm
index 1379323..275b3e8 100644
--- a/src/client/elm/Update/LoggedIn/Monthly.elm
+++ b/src/client/elm/Update/LoggedIn/Monthly.elm
@@ -15,13 +15,13 @@ updateMonthly : MonthlyAction -> Monthly -> Monthly
updateMonthly action monthly =
case action of
ToggleDetail ->
- { monthly | visibleDetail <- not monthly.visibleDetail }
+ { monthly | visibleDetail = not monthly.visibleDetail }
AddPayment payment ->
{ monthly
- | payments <- payment :: monthly.payments
- , visibleDetail <- True
+ | payments = payment :: monthly.payments
+ , visibleDetail = True
}
DeletePayment id ->
{ monthly
- | payments <- List.filter (\payment -> payment.id /= id) monthly.payments
+ | payments = List.filter (\payment -> payment.id /= id) monthly.payments
}