From d22d10da342520163014dda255d5d9bd5e1a80c0 Mon Sep 17 00:00:00 2001 From: Joris Date: Sun, 3 Jan 2016 19:57:59 +0100 Subject: Move update income to the account update layer --- src/client/elm/Model/Action.elm | 1 - src/client/elm/Model/Action/AccountAction.elm | 4 +++- 2 files changed, 3 insertions(+), 2 deletions(-) (limited to 'src/client/elm/Model') diff --git a/src/client/elm/Model/Action.elm b/src/client/elm/Model/Action.elm index ba47f2d..7267259 100644 --- a/src/client/elm/Model/Action.elm +++ b/src/client/elm/Model/Action.elm @@ -14,7 +14,6 @@ import Model.Action.LoggedInAction exposing (LoggedInAction) type Action = NoOp | SignIn String - | SetIncome Time Int | UpdateTime Time | GoLoggedInView Users UserId Payments Payments Int Payers | UpdateSignIn SignInAction diff --git a/src/client/elm/Model/Action/AccountAction.elm b/src/client/elm/Model/Action/AccountAction.elm index feddbea..520f3ab 100644 --- a/src/client/elm/Model/Action/AccountAction.elm +++ b/src/client/elm/Model/Action/AccountAction.elm @@ -7,9 +7,11 @@ import Time exposing (Time) import Model.User exposing (UserId) type AccountAction = - ToggleDetail + NoOp + | ToggleDetail | UpdatePayer UserId Time Int | ToggleIncomeEdition | UpdateIncomeEdition String | UpdateEditionError String | UpdateIncome Time Int + | ValidateUpdateIncome Time Int -- cgit v1.2.3