summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNathanael Sensfelder <SpamShield0@MultiAgentSystems.org>2017-10-23 10:31:16 +0200
committerNathanael Sensfelder <SpamShield0@MultiAgentSystems.org>2017-10-23 10:31:16 +0200
commit86ed44e3b3e9a09a7377a0b9a6e53b79e295c5e9 (patch)
tree87d8483a9005fea89f875cbe098c695b2d28e277 /src/battlemap/src/Update.elm
parentb82d435a2d720deaa11b9fc0679cf507ee867a2b (diff)
Starting work on status/config/chat UI.
Diffstat (limited to 'src/battlemap/src/Update.elm')
-rw-r--r--src/battlemap/src/Update.elm6
1 files changed, 4 insertions, 2 deletions
diff --git a/src/battlemap/src/Update.elm b/src/battlemap/src/Update.elm
index 754f7d4..6466ddf 100644
--- a/src/battlemap/src/Update.elm
+++ b/src/battlemap/src/Update.elm
@@ -2,6 +2,8 @@ module Update exposing (update)
import Event
+import UI
+
import Model
import Model.RequestDirection
import Model.SelectTile
@@ -29,6 +31,6 @@ update event model =
(Event.ScaleChangeRequested mod) ->
if (mod == 0.0)
then
- ({model | ui_scale = 1.0}, Cmd.none)
+ ({model | ui = (UI.reset_zoom_level model.ui)}, Cmd.none)
else
- ({model | ui_scale = (mod * model.ui_scale)}, Cmd.none)
+ ({model | ui = (UI.mod_zoom_level model.ui mod)}, Cmd.none)