blob: f44fee47d4a424000bbf5e4d15dabaa1f26d58c4 (
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
|
module LoggedIn.User.Update
( update
) where
import Effects exposing (Effects)
import Form exposing (Form)
import LoggedData exposing (LoggedData)
import LoggedIn.User.Model as UserModel
import LoggedIn.User.Action as UserAction
update : LoggedData -> UserAction.Action -> UserModel.Model -> (UserModel.Model, Effects UserAction.Action)
update loggedData action model =
case action of
UserAction.NoOp ->
( model
, Effects.none
)
UserAction.AddIncomeAction formAction ->
( { model | addIncome = Form.update formAction model.addIncome }
, Effects.none
)
|