1 files changed, 13 insertions, 2 deletions
diff --git a/src/ElmModule/Init.elm b/src/ElmModule/Init.elm
index ccb3595..65d31b7 100644
--- a/src/ElmModule/Init.elm
+++ b/src/ElmModule/Init.elm
@@ -1,8 +1,11 @@
 module ElmModule.Init exposing (init)
 
 -- Elm -------------------------------------------------------------------------
+import Delay
 
--- Main Menu -------------------------------------------------------------------
+import Time
+
+-- Extension -------------------------------------------------------------------
 import Struct.Event
 import Struct.Flags
 import Struct.Model
@@ -15,4 +18,12 @@ import Struct.Model
 -- EXPORTED --------------------------------------------------------------------
 --------------------------------------------------------------------------------
 init : Struct.Flags.Type -> (Struct.Model.Type, (Cmd Struct.Event.Type))
-init flags = ((Struct.Model.new flags), Cmd.none)
+init flags =
+   (
+      (Struct.Model.new flags),
+      (Delay.after
+         (toFloat (Struct.Flags.get_frequency flags))
+         (Time.minute)
+         Struct.Event.ShouldRefresh
+      )
+   )