blob: b83d486dd2c4f860f3b30f4649b57b82b3a92d45 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
|
module LoggedIn.Msg exposing
( Msg(..)
)
import Date exposing (Date)
import Model.Payment exposing (Payment, PaymentId, Frequency)
import Model.Income exposing (IncomeId)
import LoggedIn.Home.Msg as HomeMsg
import LoggedIn.Income.Msg as IncomeMsg
type Msg =
NoOp
| HomeMsg HomeMsg.Msg
| IncomeMsg IncomeMsg.Msg
| AddPayment String String Frequency
| ValidateAddPayment PaymentId String Int Frequency
| DeletePayment PaymentId
| ValidateDeletePayment PaymentId
| AddIncome Date Int
| ValidateAddIncome IncomeId Date Int
| DeleteIncome IncomeId
| ValidateDeleteIncome IncomeId
|
