aboutsummaryrefslogtreecommitdiff
path: root/src/client/elm/Update
diff options
context:
space:
mode:
authorJoris2016-03-27 21:24:11 +0200
committerJoris2016-03-27 21:24:11 +0200
commit617d30c96792795ab8561a6262c4c5f4e023b6cf (patch)
tree3174d82e3839e942a4be17a065415b497405fd0b /src/client/elm/Update
parent0c9d2b91e73f045067f7bcce6e4235fc9008f309 (diff)
Regroup monthly modules
Diffstat (limited to 'src/client/elm/Update')
-rw-r--r--src/client/elm/Update/LoggedIn/Monthly.elm21
1 files changed, 0 insertions, 21 deletions
diff --git a/src/client/elm/Update/LoggedIn/Monthly.elm b/src/client/elm/Update/LoggedIn/Monthly.elm
deleted file mode 100644
index 3741e1f..0000000
--- a/src/client/elm/Update/LoggedIn/Monthly.elm
+++ /dev/null
@@ -1,21 +0,0 @@
-module Update.LoggedIn.Monthly
- ( updateMonthly
- ) where
-
-import Model.Action.MonthlyAction exposing (..)
-import Model.View.LoggedIn.Monthly exposing (..)
-
-updateMonthly : MonthlyAction -> Monthly -> Monthly
-updateMonthly action monthly =
- case action of
- ToggleDetail ->
- { monthly | visibleDetail = not monthly.visibleDetail }
- AddPayment payment ->
- { monthly
- | payments = payment :: monthly.payments
- , visibleDetail = True
- }
- DeletePayment payment ->
- { monthly
- | payments = List.filter (((/=) payment.id) << .id) monthly.payments
- }