Clear nickname in case of collision so client could try again. Should help with
issue #550 if not fix it.
--- a/gameServer/Actions.hs Tue May 21 23:31:39 2013 +0400
+++ b/gameServer/Actions.hs Tue May 21 23:48:00 2013 +0400
@@ -381,7 +381,7 @@
if p < 38 then
processAction $ ByeClient $ loc "Nickname is already in use"
else
- processAction $ NoticeMessage NickAlreadyInUse
+ mapM_ processAction [NoticeMessage NickAlreadyInUse, ModifyClient $ \c -> c{nick = B.empty}]
else
do
db <- gets (dbQueries . serverInfo)