| summaryrefslogtreecommitdiff |
diff options
Diffstat (limited to 'src/map-editor/src/Update/SetToolboxTemplate.elm')
| -rw-r--r-- | src/map-editor/src/Update/SetToolboxTemplate.elm | 19 |
1 files changed, 7 insertions, 12 deletions
diff --git a/src/map-editor/src/Update/SetToolboxTemplate.elm b/src/map-editor/src/Update/SetToolboxTemplate.elm index 4a0593d..9ec374d 100644 --- a/src/map-editor/src/Update/SetToolboxTemplate.elm +++ b/src/map-editor/src/Update/SetToolboxTemplate.elm @@ -1,10 +1,11 @@ module Update.SetToolboxTemplate exposing (apply_to) + -- Elm ------------------------------------------------------------------------- --- Battlemap ------------------------------------------------------------------- +-- Map Editor ------------------------------------------------------------------ import Struct.Event import Struct.Toolbox -import Struct.Tile +import Struct.TileInstance import Struct.Model -------------------------------------------------------------------------------- @@ -25,16 +26,10 @@ apply_to model main_class_id variant_id = {model | toolbox = (Struct.Toolbox.set_template - (Struct.Tile.solve_tile_instance - model.tiles - (Struct.Tile.new_instance - {x = 0, y = 0} - main_class_id - variant_id - 0 - "0" - [] - ) + ( + case (Dict.get main_class_id model.tiles) of + (Just tile) -> (Struct.TileInstance.default tile) + _ -> (Struct.TileInstance.error 0 0) ) model.toolbox ) |