218                 , isRestrictedJoins = False

   218                 , isRestrictedJoins = False

   219                 , isRestrictedTeams = False

   219                 , isRestrictedTeams = False

   220                 , isRegisteredOnly = False}

   220                 , isRegisteredOnly = False}

   221                 )

   221                 )

   222         , ModifyClient2 newMasterId (\c -> c{isMaster = True})

   222         , ModifyClient2 newMasterId (\c -> c{isMaster = True})

   223         , AnswerClients [sendChan newMaster] ["ROOM_CONTROL_ACCESS", "1"]

   224         , AnswerClients [sendChan newMaster] ["ROOM_CONTROL_ACCESS", "1"]

   224         , AnswerClients thisRoomChans ["CLIENT_FLAGS", "-h", oldMaster]

   225         , AnswerClients thisRoomChans ["CLIENT_FLAGS", "-h", oldMaster]

   225         , AnswerClients thisRoomChans ["CLIENT_FLAGS", "+h", nick newMaster]

   226         , AnswerClients thisRoomChans ["CLIENT_FLAGS", "+h", nick newMaster]

   226         ]

   227         ]

   227 

   228