summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat (limited to 'src/Struct/Flags.elm')
-rw-r--r--src/Struct/Flags.elm42
1 files changed, 0 insertions, 42 deletions
diff --git a/src/Struct/Flags.elm b/src/Struct/Flags.elm
deleted file mode 100644
index e5a79f8..0000000
--- a/src/Struct/Flags.elm
+++ /dev/null
@@ -1,42 +0,0 @@
-module Struct.Flags exposing
- (
- Type,
- get_frequency,
- get_players
- )
-
--- Elm -------------------------------------------------------------------------
-import Json.Decode
-
--- Extension -------------------------------------------------------------------
-import Struct.Player
-
---------------------------------------------------------------------------------
--- TYPES -----------------------------------------------------------------------
---------------------------------------------------------------------------------
-type alias Type =
- {
- frequency : Int,
- players : String
- }
-
---------------------------------------------------------------------------------
--- LOCAL -----------------------------------------------------------------------
---------------------------------------------------------------------------------
-
---------------------------------------------------------------------------------
--- EXPORTED --------------------------------------------------------------------
---------------------------------------------------------------------------------
-get_frequency : Type -> Int
-get_frequency flags = flags.frequency
-
-get_players : Type -> (List Struct.Player.Type)
-get_players flags =
- case
- (Json.Decode.decodeString
- (Json.Decode.list (Struct.Player.decoder))
- flags.players
- )
- of
- (Ok result) -> result
- (Err _) -> []