diff options
Diffstat (limited to 'src/client/elm/Model')
| -rw-r--r-- | src/client/elm/Model/Action/LoggedInAction.elm | 4 | ||||
| -rw-r--r-- | src/client/elm/Model/Communication.elm | 4 |
2 files changed, 4 insertions, 4 deletions
diff --git a/src/client/elm/Model/Action/LoggedInAction.elm b/src/client/elm/Model/Action/LoggedInAction.elm index 22a7d3d..00e0a3e 100644 --- a/src/client/elm/Model/Action/LoggedInAction.elm +++ b/src/client/elm/Model/Action/LoggedInAction.elm @@ -6,12 +6,12 @@ import Model.Payment exposing (Payments, Payment, PaymentId) import Model.Action.MonthlyAction exposing (MonthlyAction) import Model.Action.AccountAction exposing (AccountAction) import Model.Action.AddPaymentAction exposing (AddPaymentAction) +import Model.View.LoggedIn.AddPayment exposing (Frequency) type LoggedInAction = UpdateAdd AddPaymentAction | UpdatePayments Payments - | AddPayment PaymentId String Int - | AddMonthlyPayment PaymentId String Int + | AddPayment PaymentId String Int Frequency | ToggleEdit PaymentId | DeletePayment Payment | UpdatePage Int diff --git a/src/client/elm/Model/Communication.elm b/src/client/elm/Model/Communication.elm index a7ec7a5..616d78f 100644 --- a/src/client/elm/Model/Communication.elm +++ b/src/client/elm/Model/Communication.elm @@ -6,11 +6,11 @@ import Time exposing (Time) import Model.User exposing (UserId) import Model.Payment exposing (..) +import Model.View.LoggedIn.AddPayment exposing (Frequency) type Communication = SignIn String - | AddPayment String Int - | AddMonthlyPayment String Int + | AddPayment String Int Frequency | SetIncome Time Int | DeletePayment Payment Int | DeleteMonthlyPayment PaymentId |