| summaryrefslogtreecommitdiff |
diff options
| author | nsensfel <SpamShield0@noot-noot.org> | 2018-09-14 18:57:42 +0200 |
|---|---|---|
| committer | nsensfel <SpamShield0@noot-noot.org> | 2018-09-14 18:57:42 +0200 |
| commit | 2aa0c12b6a193d16681a0179a067664390af7aee (patch) | |
| tree | ca2e2533c3a9947ba5ef9d5e1d646b964ba82eb6 /src/Struct/Model.elm | |
| parent | ac5b50e4a622ee0885678a96c69af7f49290bcee (diff) | |
...
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 |


