--- a/gameServer/Actions.hs	Sun Jan 26 00:09:50 2014 +0400
+++ b/gameServer/Actions.hs	Sun Jan 26 02:17:04 2014 +0400
@@ -466,9 +466,9 @@
                 else
                 [ByeClient $ loc "Authentication failed"]
     playerLogin p a contr = do
-        chan <- client's sendChan
+        cl <- client's id
         mapM_ processAction [
-            AnswerClients [chan] ["ASKPASSWORD"]
+            AnswerClients [sendChan cl] $ ("ASKPASSWORD") : if clientProto cl < 48 then [] else [serverSalt cl]
             , ModifyClient (\c -> c{webPassword = p, isAdministrator = a, isContributor = contr})
             ]