| summaryrefslogtreecommitdiff | 
diff options
| author | nsensfel <SpamShield0@noot-noot.org> | 2017-11-02 16:38:19 +0100 | 
|---|---|---|
| committer | nsensfel <SpamShield0@noot-noot.org> | 2017-11-02 16:38:19 +0100 | 
| commit | 87fd9b3f1c9ad877bd487ddd3375377ae965e75a (patch) | |
| tree | 12e07c8f191793f9d8dd693471bfcd5ded946dbc /src/battlemap/src/Update.elm | |
| parent | 98c9c4f227af30cad5eb28b16d4c62c0c328ccbe (diff) | |
I'll soon have to start coding stuff server-side.
Diffstat (limited to 'src/battlemap/src/Update.elm')
| -rw-r--r-- | src/battlemap/src/Update.elm | 8 | 
1 files changed, 6 insertions, 2 deletions
diff --git a/src/battlemap/src/Update.elm b/src/battlemap/src/Update.elm index a171aa6..f411659 100644 --- a/src/battlemap/src/Update.elm +++ b/src/battlemap/src/Update.elm @@ -11,6 +11,7 @@ import Model.RequestDirection  import Model.SelectTile  import Model.SelectCharacter  import Model.EndTurn +import Model.HandleServerReply  import Send.CharacterTurn @@ -62,11 +63,14 @@ update event model =                 Cmd.none              ) -      (Event.ServerReplied _) -> +      (Event.ServerReplied (Result.Err error)) ->           (              (Model.invalidate                 model -               (Error.new Error.Unimplemented "Handle server reply.") +               (Error.new Error.Networking (toString error))              ),              Cmd.none           ) + +      (Event.ServerReplied (Result.Ok commands)) -> +         (Model.HandleServerReply.apply_to model commands)  | 


