...

2 files changed, 10 insertions, 2 deletions

diff --git a/src/shared/Action/Ports.elm b/src/shared/Action/Ports.elm
index 70d5183..c14d7f4 100644
--- a/src/shared/Action/Ports.elm
+++ b/src/shared/Action/Ports.elm
@@ -1,8 +1,8 @@
 port module Action.Ports exposing (..)
 
 port get_params : () -> (Cmd msg)
-port params_in : ((Int, String) -> msg) -> (Sub msg)
-port set_params : (Int, String) -> (Cmd msg)
+port params_in : (String -> msg) -> (Sub msg)
+port set_params : (String) -> (Cmd msg)
 
 port get_results : () -> (Cmd msg)
 port results_in : (String -> msg) -> (Sub msg)
diff --git a/src/shared/Struct/Flags.elm b/src/shared/Struct/Flags.elm
index 29707a9..0347001 100644
--- a/src/shared/Struct/Flags.elm
+++ b/src/shared/Struct/Flags.elm
@@ -3,6 +3,7 @@ module Struct.Flags exposing
       Type,
       get_frequency,
       get_players,
+      default,
       decoder,
       encode
    )
@@ -36,6 +37,13 @@ get_frequency flags = flags.frequency
 get_players : Type -> (List Struct.Player.Type)
 get_players flags = flags.players
 
+default : Type
+default =
+   {
+      frequency = 1,
+      players = []
+   }
+
 decoder : (Json.Decode.Decoder Type)
 decoder =
    (Json.Decode.map2