From 36a90770ebeb9bd99e136bfe035fdda5dfabc304 Mon Sep 17 00:00:00 2001
From: Joris
Date: Sun, 19 Jun 2016 21:18:56 +0200
Subject: Add a dialog to confirm income deletion

---
 src/client/elm/LoggedIn/Home/AddPayment/Update.elm | 4 ++--
 src/client/elm/LoggedIn/Home/Update.elm            | 4 ++--
 2 files changed, 4 insertions(+), 4 deletions(-)

(limited to 'src/client/elm/LoggedIn/Home')

diff --git a/src/client/elm/LoggedIn/Home/AddPayment/Update.elm b/src/client/elm/LoggedIn/Home/AddPayment/Update.elm
index 46b3786..dc1ea57 100644
--- a/src/client/elm/LoggedIn/Home/AddPayment/Update.elm
+++ b/src/client/elm/LoggedIn/Home/AddPayment/Update.elm
@@ -13,8 +13,8 @@ import Model.Translations exposing (Translations, getMessage)
 import Model.Payment exposing (Frequency(..))
 
 update : AddPaymentMsg.Msg -> AddPaymentModel.Model -> AddPaymentModel.Model
-update action addPayment =
-  case action of
+update msg addPayment =
+  case msg of
 
     AddPaymentMsg.NoOp ->
       addPayment
diff --git a/src/client/elm/LoggedIn/Home/Update.elm b/src/client/elm/LoggedIn/Home/Update.elm
index 078036d..af3504a 100644
--- a/src/client/elm/LoggedIn/Home/Update.elm
+++ b/src/client/elm/LoggedIn/Home/Update.elm
@@ -12,8 +12,8 @@ import LoggedIn.Home.Model as HomeModel
 import LoggedIn.Home.AddPayment.Update as AddPaymentUpdate
 
 update : LoggedData -> HomeMsg.Msg -> HomeModel.Model -> (HomeModel.Model, Cmd HomeMsg.Msg)
-update loggedData action homeModel =
-  case action of
+update loggedData msg homeModel =
+  case msg of
 
     HomeMsg.NoOp -> (homeModel, Cmd.none)
 
-- 
cgit v1.2.3