diff -r 7a31a292fa84 -r 1aa5e884326a gameServer/ClientIO.hs --- a/gameServer/ClientIO.hs Sun Aug 19 09:54:46 2018 -0400 +++ b/gameServer/ClientIO.hs Tue Aug 21 02:14:15 2018 +0200 @@ -96,6 +96,7 @@ where killReciever = Exception.throwTo tId . ShutdownThreadException + -- intentionally not localized quitMessage ["BYE"] = "bye" quitMessage ("BYE":msg:_) = msg quitMessage _ = error "quitMessage"