diff -r b33127bc2424 -r 8ad85859dd3f gameServer/Actions.hs --- a/gameServer/Actions.hs Sat Dec 08 14:13:18 2018 +0100 +++ b/gameServer/Actions.hs Sat Dec 08 14:19:11 2018 +0100 @@ -885,3 +885,13 @@ processAction CheckVotes = checkVotes >>= mapM_ processAction + +processAction (ShowRegisteredOnlyState chans) = do + si <- gets serverInfo + processAction $ AnswerClients chans + ["CHAT", nickServer, + if isRegisteredUsersOnly si then + loc "This server no longer allows unregistered players to join." + else + loc "This server now allows unregistered players to join." + ]