From 3322958fa7b835df61cfe3c7147293da5a5c35a1 Mon Sep 17 00:00:00 2001
From: Teddy Wing
Date: Sun, 20 Aug 2017 14:02:33 +0200
Subject: IRC: Speed up message transfer

Instead of waiting 1 second between posting messages, pause 0.2 seconds
for faster posting. This may cause flood concerns, but improves
responsiveness from commands that send multi-line responses, like Help
and Factorial.
---
 src/IRC.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/IRC.hs b/src/IRC.hs
index 1c6a7f5..f02f76c 100644
--- a/src/IRC.hs
+++ b/src/IRC.hs
@@ -16,7 +16,7 @@ import Plugin (matchPlugin, performPlugin)
 
 connectIRC :: B.ByteString -> Int -> T.Text -> IO ()
 connectIRC host port nick = do
-    conn <- IRC.connectWithTLS host port 1
+    conn <- IRC.connectWithTLS host port 0.2
     let cfg = IRC.defaultIRCConf nick
     let cfg' = cfg
             {
-- 
cgit v1.2.3