| summaryrefslogtreecommitdiff |
diff options
Diffstat (limited to 'src/Struct/Model.elm')
| -rw-r--r-- | src/Struct/Model.elm | 12 |
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 |


