1 files changed, 12 insertions, 8 deletions

diff --git a/src/map-editor/src/View/SubMenu/Status/TileInfo.elm b/src/map-editor/src/View/SubMenu/Status/TileInfo.elm
index 450e52d..166dc42 100644
--- a/src/map-editor/src/View/SubMenu/Status/TileInfo.elm
+++ b/src/map-editor/src/View/SubMenu/Status/TileInfo.elm
@@ -14,6 +14,7 @@ import Struct.Event
 import Struct.Location
 import Struct.Model
 import Struct.Tile
+import Struct.TileInstance
 
 import Util.Html
 
@@ -22,7 +23,7 @@ import View.Map.Tile
 --------------------------------------------------------------------------------
 -- LOCAL -----------------------------------------------------------------------
 --------------------------------------------------------------------------------
-get_icon : (Struct.Tile.Instance -> (Html.Html Struct.Event.Type))
+get_icon : (Struct.TileInstance.Type -> (Html.Html Struct.Event.Type))
 get_icon tile =
    (Html.div
       [
@@ -30,7 +31,10 @@ get_icon tile =
          (Html.Attributes.class
             (
                "map-tile-variant-"
-               ++ (String.fromInt (Struct.Tile.get_local_variant_ix tile))
+               ++
+               (String.fromInt
+                  (Struct.TileInstance.get_local_variant_ix tile)
+               )
             )
          )
       ]
@@ -39,11 +43,11 @@ get_icon tile =
 
 get_name : (
       Struct.Model.Type ->
-      Struct.Tile.Instance ->
+      Struct.TileInstance.Type ->
       (Html.Html Struct.Event.Type)
    )
 get_name model tile =
-   case (Dict.get (Struct.Tile.get_type_id tile) model.tiles) of
+   case (Dict.get (Struct.TileInstance.get_class_id tile) model.tiles) of
       Nothing -> (Util.Html.nothing)
       (Just tile_type) ->
          (Html.div
@@ -55,10 +59,10 @@ get_name model tile =
             ]
          )
 
-get_cost : (Struct.Tile.Instance -> (Html.Html Struct.Event.Type))
+get_cost : (Struct.TileInstance.Type -> (Html.Html Struct.Event.Type))
 get_cost tile =
    let
-      cost = (Struct.Tile.get_instance_cost tile)
+      cost = (Struct.TileInstance.get_cost tile)
       text =
          if (cost > Constants.Movement.max_points)
          then
@@ -75,10 +79,10 @@ get_cost tile =
          ]
       )
 
-get_location : (Struct.Tile.Instance -> (Html.Html Struct.Event.Type))
+get_location : (Struct.TileInstance.Type -> (Html.Html Struct.Event.Type))
 get_location tile =
    let
-      tile_location = (Struct.Tile.get_location tile)
+      tile_location = (Struct.TileInstance.get_location tile)
    in
       (Html.div
          [