Borked mouse controls for the navigator, it seems.

1 files changed, 9 insertions, 5 deletions

diff --git a/elm/battlemap/src/Battlemap/Tile.elm b/elm/battlemap/src/Battlemap/Tile.elm
index 828fb67..255310a 100644
--- a/elm/battlemap/src/Battlemap/Tile.elm
+++ b/elm/battlemap/src/Battlemap/Tile.elm
@@ -1,7 +1,8 @@
 module Battlemap.Tile exposing
    (
       Type,
-      get_class,
+      get_location,
+      get_icon_id,
       get_cost
    )
 
@@ -9,13 +10,16 @@ import Battlemap.Location
 
 type alias Type =
    {
-      location : Battlemap.Location.Ref,
-      class : Int,
+      location : Battlemap.Location.Type,
+      icon_id : String,
       crossing_cost : Int
    }
 
-get_class : Type -> Int
-get_class tile = tile.class
+get_location : Type -> Battlemap.Location.Type
+get_location tile = tile.location
+
+get_icon_id : Type -> String
+get_icon_id tile = tile.icon_id
 
 get_cost : Type -> Int
 get_cost tile = tile.crossing_cost