From e32a9126ae7fd7f9596dd08b64ecab8644d994bd Mon Sep 17 00:00:00 2001 From: Joris Date: Wed, 30 Dec 2015 00:28:41 +0100 Subject: Upgrade to elm 0.16.0 --- src/client/elm/Update/LoggedIn/Add.elm | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'src/client/elm/Update/LoggedIn/Add.elm') 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 } -- cgit v1.2.3