summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat (limited to 'client/elm/battlemap/src/Model.elm')
-rw-r--r--client/elm/battlemap/src/Model.elm11
1 files changed, 5 insertions, 6 deletions
diff --git a/client/elm/battlemap/src/Model.elm b/client/elm/battlemap/src/Model.elm
index 3bc240e..f5f57c0 100644
--- a/client/elm/battlemap/src/Model.elm
+++ b/client/elm/battlemap/src/Model.elm
@@ -1,4 +1,4 @@
-module Model exposing (Type)
+module Model exposing (Type, State(..))
import Dict
@@ -9,14 +9,16 @@ import Battlemap.RangeIndicator
import Character
-import Shim.Model
+type State =
+ Default
+ | MovingCharacter Character.Ref
-- MODEL
type alias Type =
{
+ state: State,
battlemap: Battlemap.Type,
navigator: (Maybe Battlemap.Navigator.Type),
- selection: (Maybe String),
characters: (Dict.Dict Character.Ref Character.Type),
range_indicator:
(Dict.Dict
@@ -24,6 +26,3 @@ type alias Type =
Battlemap.RangeIndicator.Type
)
}
-
-model : Type
-model = (Shim.Model.generate)