From 8cd63a64abafe21378c35c2489d49f24c9ece3c9 Mon Sep 17 00:00:00 2001 From: Joris Date: Mon, 4 Apr 2016 01:27:36 +0200 Subject: Add income list CRUD in user page --- src/client/elm/LoggedIn/Home/Update.elm | 9 --------- 1 file changed, 9 deletions(-) (limited to 'src/client/elm/LoggedIn/Home/Update.elm') diff --git a/src/client/elm/LoggedIn/Home/Update.elm b/src/client/elm/LoggedIn/Home/Update.elm index b43ebb7..cebdc70 100644 --- a/src/client/elm/LoggedIn/Home/Update.elm +++ b/src/client/elm/LoggedIn/Home/Update.elm @@ -9,9 +9,6 @@ import LoggedData exposing (LoggedData) import LoggedIn.Home.Action as HomeAction import LoggedIn.Home.Model as HomeModel -import LoggedIn.Home.Account.Action as AccountAction -import LoggedIn.Home.Account.Update as AccountUpdate - import LoggedIn.Home.AddPayment.Update as AddPaymentUpdate update : LoggedData -> HomeAction.Action -> HomeModel.Model -> (HomeModel.Model, Effects HomeAction.Action) @@ -25,12 +22,6 @@ update loggedData action homeModel = , Effects.none ) - HomeAction.UpdateAccount accountAction -> - let (newAccount, accountEffects) = AccountUpdate.update loggedData accountAction homeModel.account - in ( { homeModel | account = newAccount } - , Effects.map HomeAction.UpdateAccount accountEffects - ) - HomeAction.ToggleEdit id -> ( { homeModel | paymentEdition = if homeModel.paymentEdition == Just id then Nothing else Just id } , Effects.none -- cgit v1.2.3