summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat (limited to 'src/Struct/Model.elm')
-rw-r--r--src/Struct/Model.elm12
1 files changed, 9 insertions, 3 deletions
diff --git a/src/Struct/Model.elm b/src/Struct/Model.elm
index 6d4a588..dca14c2 100644
--- a/src/Struct/Model.elm
+++ b/src/Struct/Model.elm
@@ -22,7 +22,9 @@ type alias Type =
{
flags: Struct.Flags.Type,
error: (Maybe Struct.Error.Type),
- players: (Array.Array Struct.Player.Type)
+ players: (Array.Array Struct.Player.Type),
+ query_index: Int,
+ notify: Bool
}
--------------------------------------------------------------------------------
@@ -37,13 +39,17 @@ new flags =
{
flags = flags,
error = Nothing,
- players = (Array.empty)
+ players = (Array.fromList (Struct.Flags.get_players flags)),
+ query_index = -1,
+ notify = False
}
reset : Type -> Type
reset model =
{model |
- error = Nothing
+ error = Nothing,
+ notify = False,
+ query_index = -1
}
invalidate : Struct.Error.Type -> Type -> Type