summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authornsensfel <SpamShield0@noot-noot.org>2019-05-03 17:23:24 +0200
committernsensfel <SpamShield0@noot-noot.org>2019-05-03 17:23:24 +0200
commitc14e56360447d5581913d5a535b0540378f04a04 (patch)
tree1db4c28de2df71bc575b8a2704551a2b72e7d25d /src/shared/battle-map/BattleMap/Struct/Map.elm
parent5b60ea80b8e3f4c0fcfe8764f37e54a8e6f4d9bb (diff)
Adds partial Marker edition (no permissions yet).
Diffstat (limited to 'src/shared/battle-map/BattleMap/Struct/Map.elm')
-rw-r--r--src/shared/battle-map/BattleMap/Struct/Map.elm4
1 files changed, 4 insertions, 0 deletions
diff --git a/src/shared/battle-map/BattleMap/Struct/Map.elm b/src/shared/battle-map/BattleMap/Struct/Map.elm
index 97f0ae8..fb3f8fb 100644
--- a/src/shared/battle-map/BattleMap/Struct/Map.elm
+++ b/src/shared/battle-map/BattleMap/Struct/Map.elm
@@ -5,6 +5,7 @@ module BattleMap.Struct.Map exposing
empty,
get_height,
get_markers,
+ set_markers,
get_movement_cost_function,
get_omnimods_at,
get_tiles,
@@ -76,6 +77,9 @@ get_tiles map = map.content
get_markers : Type -> (Dict.Dict String BattleMap.Struct.Marker.Type)
get_markers map = map.markers
+set_markers : (Dict.Dict String BattleMap.Struct.Marker.Type) -> Type -> Type
+set_markers markers map = {map | markers = markers}
+
set_tile_to : BattleMap.Struct.Location.Type -> BattleMap.Struct.TileInstance.Type -> Type -> Type
set_tile_to loc tile_inst map =
{map |