Rename message to msg. Add comment with Debug.log "msg"

This commit is contained in:
Roman Frołow 2019-11-19 10:05:10 +01:00
parent ade374b1d8
commit 665586b19d
3 changed files with 9 additions and 6 deletions

View File

@ -94,8 +94,9 @@ subscriptions _ =
update : Msg -> Model -> ( Model, Cmd Msg )
update message model =
case message of
update msg model =
-- case Debug.log "msg" msg of
case msg of
YearOfBirthChanged yearOfBirth ->
( { model | yearOfBirth = Just yearOfBirth }
, Cmd.none

View File

@ -57,7 +57,8 @@ subscriptions _ =
update : Msg -> Model -> ( Model, Cmd Msg )
update message model =
case message of
update msg model =
-- case Debug.log "msg" msg of
case msg of
NoOp ->
( model, Cmd.none )

View File

@ -53,7 +53,8 @@ subscriptions _ =
update : Msg -> Model -> ( Model, Cmd Msg )
update message model =
case message of
update msg model =
-- case Debug.log "msg" msg of
case msg of
NoOp ->
( model, Cmd.none )