gameServer/HWProtoLobbyState.hs
changeset 13702 dc06ef77a73a
parent 13509 9ba5e4594322
child 13826 07b3dacd00f8
--- a/gameServer/HWProtoLobbyState.hs	Sat Aug 25 21:36:15 2018 +0200
+++ b/gameServer/HWProtoLobbyState.hs	Sat Aug 25 22:02:21 2018 +0200
@@ -26,6 +26,7 @@
 --------------------------------------
 import CoreTypes
 import Utils
+import Consts
 import HandlerUtils
 import RoomsAndClients
 import EngineInteraction
@@ -117,7 +118,7 @@
             ++ answerFullConfig cl jRoom
             ++ answerTeams cl jRoom
             ++ watchRound cl jRoom chans
-            ++ [AnswerClients [sendChan cl] ["CHAT", "[greeting]", greeting jRoom] | greeting jRoom /= ""]
+            ++ [AnswerClients [sendChan cl] ["CHAT", nickGreeting, greeting jRoom] | greeting jRoom /= ""]
             ++ map (\t -> AnswerClients chans ["EM", toEngineMsg $ 'G' `B.cons` t]) clTeamsNames
             ++ [AnswerClients [sendChan cl] ["EM", toEngineMsg "I"] | isPaused `fmap` gameInfo jRoom == Just True]