diff options
| author | Jasper Van der Jeugt | 2020-07-29 21:51:54 +0200 |
|---|---|---|
| committer | Jasper Van der Jeugt | 2020-07-29 21:51:54 +0200 |
| commit | 231b46d9fbafaff2a8cdcc7bd6c9a813b1a61742 (patch) | |
| tree | ac4136d80b8fbaa94b55850beba8e46d7a5fd789 /client/src/Client.elm | |
| parent | 49b346b7ebe98051a618d88a39d9b02f13edf33c (diff) | |
Collect player sinks
Diffstat (limited to 'client/src/Client.elm')
| -rw-r--r-- | client/src/Client.elm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/client/src/Client.elm b/client/src/Client.elm index ffb2b0e..0644a12 100644 --- a/client/src/Client.elm +++ b/client/src/Client.elm @@ -46,7 +46,8 @@ update msg model = case msg of WebSocketIn json -> case Json.Decode.decodeString Messages.jsonDecServerMessage json of Err str -> (Error <| Json.Decode.errorToString str, Cmd.none) - Ok Messages.Welcome -> Debug.log "Welcome" (model, Cmd.none) + Ok (Messages.Welcome playerId) -> + Debug.log ("Welcome " ++ String.fromInt playerId) (model, Cmd.none) Ok Messages.Bye -> Debug.log "Bye" (model, Cmd.none) main : Program () Model Msg |