diff -r 0135e64c6c66 -r c4fd2813b127 gameServer/ClientIO.hs --- a/gameServer/ClientIO.hs Wed May 16 18:22:28 2018 +0200 +++ b/gameServer/ClientIO.hs Wed Jul 31 23:14:27 2019 +0200 @@ -96,6 +96,7 @@ where killReciever = Exception.throwTo tId . ShutdownThreadException + -- intentionally not localized quitMessage ["BYE"] = "bye" quitMessage ("BYE":msg:_) = msg quitMessage _ = error "quitMessage"