equal
deleted
inserted
replaced
74 if isNothing maybeRI || not sameProto then |
74 if isNothing maybeRI || not sameProto then |
75 [Warning "No such room"] |
75 [Warning "No such room"] |
76 else if isRestrictedJoins jRoom then |
76 else if isRestrictedJoins jRoom then |
77 [Warning "Joining restricted"] |
77 [Warning "Joining restricted"] |
78 else if roomPassword /= password jRoom then |
78 else if roomPassword /= password jRoom then |
79 [Warning "Wrong password"] |
79 [NoticeMessage WrongPassword] |
80 else |
80 else |
81 [ |
81 [ |
82 MoveToRoom jRI, |
82 MoveToRoom jRI, |
83 AnswerClients [sendChan cl] $ "JOINED" : nicks, |
83 AnswerClients [sendChan cl] $ "JOINED" : nicks, |
84 AnswerClients chans ["CLIENT_FLAGS", "-r", nick cl] |
84 AnswerClients chans ["CLIENT_FLAGS", "-r", nick cl] |