...

3 files changed, 8 insertions, 28 deletions

diff --git a/src/battle/Makefile b/src/battle/Makefile
index 3b58a08..4fabb97 100644
--- a/src/battle/Makefile
+++ b/src/battle/Makefile
@@ -5,7 +5,7 @@ SRC_DIR ?= src
 WWW_DIR ?= www
 WWW_SCRIPT_DIR ?= $(WWW_DIR)/script
 
-ELM_CC ?= elm-make --warn
+ELM_CC ?= elm make
 
 MAIN_MODULE ?= $(SRC_DIR)/Main.elm
 
diff --git a/src/battle/elm-package.json b/src/battle/elm-package.json
deleted file mode 100644
index e824a29..0000000
--- a/src/battle/elm-package.json
+++ /dev/null
@@ -1,20 +0,0 @@
-{
-    "version": "1.0.0",
-    "summary": "helpful summary of your project, less than 80 characters",
-    "repository": "https://github.com/nsensfel/tacticians-client.git",
-    "license": "Apache 2.0",
-    "source-directories": [
-        "src",
-        "../shared/elm"
-    ],
-    "exposed-modules": [],
-    "dependencies": {
-        "NoRedInk/elm-decode-pipeline": "3.0.0 <= v < 4.0.0",
-        "andrewMacmurray/elm-delay": "2.0.3 <= v < 3.0.0",
-        "elm-lang/core": "5.1.1 <= v < 6.0.0",
-        "elm-lang/dom": "1.1.1 <= v < 2.0.0",
-        "elm-lang/html": "2.0.0 <= v < 3.0.0",
-        "elm-lang/http": "1.0.0 <= v < 2.0.0"
-    },
-    "elm-version": "0.18.0 <= v < 0.19.0"
-}
diff --git a/src/battle/src/Action/Scroll.elm b/src/battle/src/Action/Scroll.elm
index cf071ae..fd9e80a 100644..100755
--- a/src/battle/src/Action/Scroll.elm
+++ b/src/battle/src/Action/Scroll.elm
@@ -1,8 +1,8 @@
 module Action.Scroll exposing (to)
 
 -- Elm -------------------------------------------------------------------------
-import Dom
-import Dom.Scroll
+import Browser.Dom
+import Browser.Dom.Scroll
 
 import Task
 
@@ -25,9 +25,9 @@ tile_to_px ui t =
       * (toFloat Constants.UI.tile_size)
    )
 
-scroll_to_x : Int -> Struct.UI.Type -> (Task.Task Dom.Error ())
+scroll_to_x : Int -> Struct.UI.Type -> (Task.Task Browser.Dom.Error ())
 scroll_to_x x ui =
-   (Dom.Scroll.toX
+   (Browser.Dom.Scroll.toX
       Constants.UI.viewer_html_id
       (
          (tile_to_px ui x)
@@ -37,9 +37,9 @@ scroll_to_x x ui =
       )
    )
 
-scroll_to_y : Int -> Struct.UI.Type -> (Task.Task Dom.Error ())
+scroll_to_y : Int -> Struct.UI.Type -> (Task.Task Browser.Dom.Error ())
 scroll_to_y y ui =
-   (Dom.Scroll.toY
+   (Browser.Dom.Scroll.toY
       Constants.UI.viewer_html_id
       (
          (tile_to_px ui y)
@@ -52,7 +52,7 @@ scroll_to_y y ui =
 --------------------------------------------------------------------------------
 -- EXPORTED --------------------------------------------------------------------
 --------------------------------------------------------------------------------
-to : Struct.Location.Type -> Struct.UI.Type -> (Task.Task Dom.Error (List ()))
+to : Struct.Location.Type -> Struct.UI.Type -> (Task.Task Browser.Dom.Error (List ()))
 to loc ui =
    (Task.sequence
       [