From 4de9063e678c2ac6ccb5d302d50d10bef73153bb Mon Sep 17 00:00:00 2001
From: Danila Fedorin <danila.fedorin@gmail.com>
Date: Wed, 26 Dec 2018 23:20:51 -0800
Subject: [PATCH] Disable DDOS-tier retry attempts on failed network
 communication.

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

diff --git a/src/Main.elm b/src/Main.elm
index 6379900..09a8320 100644
--- a/src/Main.elm
+++ b/src/Main.elm
@@ -236,7 +236,7 @@ updateViewportAfterMessage m vr =
 updateUserData : Model -> String -> Result Http.Error UserData -> (Model, Cmd Msg)
 updateUserData m s r = case r of
     Ok ud -> ({ m | userData = Dict.insert s ud m.userData }, Cmd.none)
-    Err e -> ({ m | errors = ("Failed to retrieve user data for user " ++ s)::m.errors }, userData m.apiUrl (Maybe.withDefault "" m.token) s)
+    Err e -> ({ m | errors = ("Failed to retrieve user data for user " ++ s)::m.errors }, Cmd.none)
 
 updateSendRoomText : Model -> RoomId -> (Model, Cmd Msg)
 updateSendRoomText m r =
@@ -319,7 +319,7 @@ updateSyncResponse model r notify =
                 , setScrollCmd sr
                 , setReadReceiptCmd sr
                 ])
-            _ -> (model, syncCmd)
+            _ -> (model, Cmd.none)
 
 subscriptions : Model -> Sub Msg
 subscriptions m =