# HG changeset patch
# User unC0Rr
# Date 1421225270 -10800
# Node ID 50a4cdeedb44cdb30998f0a64a92b8cc45005ae4
# Parent  712283ed86e0e7a6548a27908f1ffb5362833686
Oops, misspelled protocol command

diff -r 712283ed86e0 -r 50a4cdeedb44 gameServer/Votes.hs
--- a/gameServer/Votes.hs	Tue Jan 13 23:37:07 2015 +0300
+++ b/gameServer/Votes.hs	Wed Jan 14 11:47:50 2015 +0300
@@ -116,7 +116,7 @@
         chans <- roomClientsChans
         let answers = concatMap (\t -> 
                 [ModifyRoom $ modifyTeam t{hhnum = h}
-                , AnswerClients chans ["HHNUM", teamname t, showB h]]
+                , AnswerClients chans ["HH_NUM", teamname t, showB h]]
                 )
                 $
                 if isJust $ gameInfo rm then