diff options
Diffstat (limited to 'src/client/elm/Model/Action')
| -rw-r--r-- | src/client/elm/Model/Action/AddPaymentAction.elm | 1 | ||||
| -rw-r--r-- | src/client/elm/Model/Action/LoggedInAction.elm | 3 | ||||
| -rw-r--r-- | src/client/elm/Model/Action/SignInAction.elm | 2 |
3 files changed, 4 insertions, 2 deletions
diff --git a/src/client/elm/Model/Action/AddPaymentAction.elm b/src/client/elm/Model/Action/AddPaymentAction.elm index 172f35f..a109a49 100644 --- a/src/client/elm/Model/Action/AddPaymentAction.elm +++ b/src/client/elm/Model/Action/AddPaymentAction.elm @@ -7,3 +7,4 @@ type AddPaymentAction = | UpdateCost String | AddError (Maybe String) (Maybe String) | ToggleFrequency + | WaitingServer diff --git a/src/client/elm/Model/Action/LoggedInAction.elm b/src/client/elm/Model/Action/LoggedInAction.elm index aaf3c7f..18d2224 100644 --- a/src/client/elm/Model/Action/LoggedInAction.elm +++ b/src/client/elm/Model/Action/LoggedInAction.elm @@ -10,7 +10,8 @@ import Model.Action.AddPaymentAction exposing (AddPaymentAction) type LoggedInAction = UpdateAdd AddPaymentAction | UpdatePayments Payments - | AddPayment PaymentId String Int PaymentFrequency + | AddPayment String Int PaymentFrequency + | ValidateAddPayment PaymentId String Int PaymentFrequency | DeletePayment Payment PaymentFrequency | ToggleEdit PaymentId | UpdatePage Int diff --git a/src/client/elm/Model/Action/SignInAction.elm b/src/client/elm/Model/Action/SignInAction.elm index ed64c1d..eaa9f8b 100644 --- a/src/client/elm/Model/Action/SignInAction.elm +++ b/src/client/elm/Model/Action/SignInAction.elm @@ -3,5 +3,5 @@ module Model.Action.SignInAction ) where type SignInAction = - Connecting + WaitingServer | ErrorLogin String |