diff -r b5a7f83fa607 -r 70c8feb81d35 gameServer/CommandHelp.hs --- a/gameServer/CommandHelp.hs Sat Aug 25 12:12:15 2018 +0200 +++ b/gameServer/CommandHelp.hs Sat Aug 25 17:43:29 2018 +0200 @@ -99,7 +99,7 @@ -- Helper functions for chat command handler cmdHelpActionEntry :: [ClientChan] -> B.ByteString -> Action -cmdHelpActionEntry chan msg = AnswerClients chan [ "CHAT", "[server]", B.concat [ " ", msg ] ] +cmdHelpActionEntry chan msg = AnswerClients chan [ "CHAT", "[server]", msg ] cmdHelpActionList :: [ClientChan] -> [B.ByteString] -> [Action] cmdHelpActionList chan list = map (cmdHelpActionEntry chan) list