Show "incompatible version" message instead of "no such room" on try to join room with another protocol version
--- 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