blob: e1e2dbab876fce632bdca6dfbe07d5a2fedb5336 (
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
|
module Dialog.Update exposing
( update
)
import Form exposing (Form)
import Dialog.Msg as Dialog
import Dialog.Model as Dialog
update : Dialog.Msg -> Dialog.Model -> (Dialog.Model, Cmd Dialog.Msg)
update msg model =
case msg of
Dialog.NoOp ->
( model
, Cmd.none
)
Dialog.AddPaymentMsg formMsg ->
( { model
| addPayment = Form.update formMsg model.addPayment
}
, Cmd.none
)
|
