diff -r 63b3da03ce46 -r daf1785f2337 gameServer/Actions.hs --- a/gameServer/Actions.hs Wed Sep 02 08:53:46 2009 +0000 +++ b/gameServer/Actions.hs Wed Sep 02 09:04:06 2009 +0000 @@ -233,9 +233,10 @@ adjust (\cl -> cl{isMaster = True}) newMasterId clients, adjust (\r -> r{name = newRoomName}) rID rooms ) - newRoomName = "abandoned" + newRoomName = nick newMasterClient otherPlayersSet = IntSet.delete clID (playersIDs room) newMasterId = IntSet.findMin otherPlayersSet + newMasterClient = clients ! newMasterId processAction (clID, serverInfo, clients, rooms) (AddRoom roomName roomPassword) = do