better wording

This commit is contained in:
nek0 2024-04-08 02:42:07 +02:00
parent 96b6db4755
commit 8691274c56

View file

@ -121,7 +121,7 @@ processRequests = do
void $ liftIO $ forkIO $ forever $ acceptConnection mainSocket socketList queue
where
acceptConnection mainSocket socketList queue = do
putStrLn "New connection request incoming"
putStrLn "Ready for new connection requests"
(clientSock, _) <- accept mainSocket
clientThreadId <- liftIO $ forkIO $ forever $ do
receiveMessage clientSock queue socketList