Stern: reduce batch size to 50 when GetNotifications

wireapp · Jul 17, 2023 · a601cef · a601cef
1 parent 0020ed6
commit a601cef
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/tools/stern/src/Stern/Intra.hs b/tools/stern/src/Stern/Intra.hs
@@ -856,7 +856,7 @@ getUserNotifications uid = do
         200 -> parseResponse (mkError status502 "bad-upstream") r
         404 -> parseResponse (mkError status502 "bad-upstream") r
         _ -> throwE (mkError status502 "bad-upstream" "")
-    batchSize = 100 :: Int
+    batchSize = 50 :: Int
 
 registerOAuthClient :: OAuthClientConfig -> Handler OAuthClientCredentials
 registerOAuthClient conf = do