| summaryrefslogtreecommitdiff |
diff options
Diffstat (limited to 'src/Struct')
| -rw-r--r-- | src/Struct/Event.elm | 4 | ||||
| -rw-r--r-- | src/Struct/Flags.elm | 4 |
2 files changed, 6 insertions, 2 deletions
diff --git a/src/Struct/Event.elm b/src/Struct/Event.elm index 3bf64d7..68bca98 100644 --- a/src/Struct/Event.elm +++ b/src/Struct/Event.elm @@ -13,6 +13,10 @@ import Struct.ServerReply type Type = None | Failed Struct.Error.Type + | SetUsername String + | SetID String + | SetURLPrefix String + | SetFrequency Int | ServerReplied (Result Http.Error (List Struct.ServerReply.Type)) attempted : (Result.Result err val) -> Type diff --git a/src/Struct/Flags.elm b/src/Struct/Flags.elm index ccda57a..d9d2dcd 100644 --- a/src/Struct/Flags.elm +++ b/src/Struct/Flags.elm @@ -17,7 +17,7 @@ import Util.List type alias Type = { frequency : Int, - players : (List String) + players : String } -------------------------------------------------------------------------------- @@ -30,5 +30,5 @@ type alias Type = get_frequency : Type -> Int get_frequency flags = flags.frequency -get_players : Type -> (List String) +get_players : Type -> String get_players flags = flags.players |