Mercurial Mercurial > hedgewars / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
gameServer/HWProtoNEState.hs
changeset 5030 42746c5d4a80
parent 4991 90d1fb9fc2e1
child 5090 2922455e606e 
--- a/gameServer/HWProtoNEState.hs	Sun Mar 20 08:42:32 2011 +0000
+++ b/gameServer/HWProtoNEState.hs	Mon Mar 21 21:04:20 2011 +0300
@@ -32,7 +32,7 @@
             else
             return $
                 ModifyClient (\c -> c{clientProto = parsedProto}) :
-                AnswerClients [sendChan cl] ["PROTO", B.pack $ show parsedProto] :
+                AnswerClients [sendChan cl] ["PROTO", showB parsedProto] :
                 [CheckRegistered | not . B.null $ nick cl]
     where
         parsedProto = case B.readInt protoNum of
hedgewars