From b8cdee378647f81bbbbc5aafd4c58b1e15cb0192 Mon Sep 17 00:00:00 2001
From: Jan Tuomi <jan.tuomi@valuemotive.com>
Date: Fri, 5 Nov 2021 09:11:38 +0200
Subject: Get posts on 5s interval

---
 src/Main.elm | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/Main.elm b/src/Main.elm
index 35cf413..75bc498 100644
--- a/src/Main.elm
+++ b/src/Main.elm
@@ -225,7 +225,10 @@ composePost model =
 
 subscriptions : Model -> Sub Msg
 subscriptions _ =
-    Time.every 5000 SetNowPosix
+    Sub.batch
+        [ Time.every 5000 SetNowPosix
+        , Time.every 5000 (\_ -> GetPosts)
+        ]
 
 
 
-- 
cgit v1.3