From b11c62796dce7f482c6e8ddacef591a6a3821145 Mon Sep 17 00:00:00 2001 From: nsensfel Date: Tue, 24 Oct 2017 15:24:59 +0200 Subject: Adds teams. --- src/battlemap/src/Update.elm | 13 +++++++++++++ 1 file changed, 13 insertions(+) (limited to 'src/battlemap/src/Update.elm') diff --git a/src/battlemap/src/Update.elm b/src/battlemap/src/Update.elm index 60d1f25..c62100d 100644 --- a/src/battlemap/src/Update.elm +++ b/src/battlemap/src/Update.elm @@ -37,3 +37,16 @@ update event model = (Event.TabSelected tab) -> ({model | ui = (UI.set_displayed_tab model.ui tab)}, Cmd.none) + + (Event.DebugTeamSwitchRequest) -> + if (model.controlled_team == 0) + then + ( + (Model.reset {model | controlled_team = 1} model.characters), + Cmd.none + ) + else + ( + (Model.reset {model | controlled_team = 0} model.characters), + Cmd.none + ) -- cgit v1.2.3-70-g09d2