# HG changeset patch
# User Wuzzy <Wuzzy2@mail.ru>
# Date 1535752172 -7200
# Node ID 3106d630d6b5322ddea61d4684429d68068797db
# Parent  69a913e064e3866826d67303dd81fe2065c1abdd
Make guest rejection error translatable

diff -r 69a913e064e3 -r 3106d630d6b5 gameServer/Actions.hs
--- a/gameServer/Actions.hs	Fri Aug 31 23:13:20 2018 +0200
+++ b/gameServer/Actions.hs	Fri Aug 31 23:49:32 2018 +0200
@@ -479,7 +479,7 @@
             c <- client's isChecker
             when (not b) $ (if c then checkerLogin else playerLogin) passwd isAdmin isContr
         Guest | isRegisteredUsersOnly si -> do
-            processAction $ ByeClient "Registered users only"
+            processAction $ ByeClient $ loc "This server only allows registered users to join."
             | otherwise -> do
             b <- isBanned
             c <- client's isChecker