src/client/elm/LoggedIn/Msg.elm


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

module LoggedIn.Msg exposing
  ( Msg(..)
  )

import Date exposing (Date)

import Model.Payment exposing (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
  | ValidateCreatePayment PaymentId String Int Date Frequency
  | ValidateEditPayment PaymentId String Int Date Frequency
  | ValidateDeletePayment PaymentId
  | ValidateCreateIncome IncomeId Int Date
  | ValidateEditIncome IncomeId Int Date
  | ValidateDeleteIncome IncomeId