aboutsummaryrefslogtreecommitdiff
path: root/src/client/elm/Update/LoggedIn/Add.elm
diff options
context:
space:
mode:
Diffstat (limited to 'src/client/elm/Update/LoggedIn/Add.elm')
-rw-r--r--src/client/elm/Update/LoggedIn/Add.elm10
1 files changed, 5 insertions, 5 deletions
diff --git a/src/client/elm/Update/LoggedIn/Add.elm b/src/client/elm/Update/LoggedIn/Add.elm
index 1f28997..92bdb7e 100644
--- a/src/client/elm/Update/LoggedIn/Add.elm
+++ b/src/client/elm/Update/LoggedIn/Add.elm
@@ -15,15 +15,15 @@ updateAddPayment : AddPaymentAction -> AddPayment -> AddPayment
updateAddPayment action addPayment =
case action of
UpdateName name ->
- { addPayment | name <- name }
+ { addPayment | name = name }
UpdateCost cost ->
- { addPayment | cost <- cost }
+ { addPayment | cost = cost }
AddError nameError costError ->
{ addPayment
- | nameError <- nameError
- , costError <- costError
+ | nameError = nameError
+ , costError = costError
}
ToggleFrequency ->
{ addPayment
- | frequency <- if addPayment.frequency == Punctual then Monthly else Punctual
+ | frequency = if addPayment.frequency == Punctual then Monthly else Punctual
}