gameServer/HWProtoLobbyState.hs
changeset 9729 6a3640c4f4b7
parent 9702 27006953d901
child 9753 9579596cf471
--- a/gameServer/HWProtoLobbyState.hs	Sat Nov 30 14:36:41 2013 +0100
+++ b/gameServer/HWProtoLobbyState.hs	Sat Nov 30 17:43:58 2013 +0400
@@ -64,8 +64,10 @@
     let chans = map sendChan (cl : jRoomClients)
     let isBanned = host cl `elem` roomBansList jRoom
     return $
-        if isNothing maybeRI || not sameProto then
+        if isNothing maybeRI then
             [Warning $ loc "No such room"]
+            else if not sameProto then
+            [Warning $ loc "Room version incompatible to your hedgewars version"]
             else if isRestrictedJoins jRoom then
             [Warning $ loc "Joining restricted"]
             else if isRegisteredOnly jRoom && (B.null . webPassword $ cl) then