diff -r 4feced261c68 -r de822cd3df3a gameServer/Utils.hs
--- a/gameServer/Utils.hs	Tue Jan 21 22:38:13 2014 +0100
+++ b/gameServer/Utils.hs	Tue Jan 21 22:43:06 2014 +0100
@@ -116,7 +116,7 @@
 readInt_ str =
   case B.readInt str of
        Just (i, t) | B.null t -> fromIntegral i
-       _                      -> 0 
+       _                      -> 0
 
 cutHost :: B.ByteString -> B.ByteString
 cutHost = B.intercalate "." .  flip (++) ["*","*"] . List.take 2 . B.split '.'
@@ -128,7 +128,7 @@
 upperCase = UTF8.fromString . map Char.toUpper . UTF8.toString
 
 roomInfo :: Word16 -> B.ByteString -> RoomInfo -> [B.ByteString]
-roomInfo p n r 
+roomInfo p n r
     | p < 46 = [
         showB $ isJust $ gameInfo r,
         name r,