~singpolyma/cheogram

5a9f319d5826f2d6adaa1f278308f23e1c0203a5 — Stephen Paul Weber 6 years ago 80c2e3b
Persist rooms we create, allow anyone to send invites

The latter is not supported on Prosody
<https://prosody.im/issues/issue/254> which is why we still set everyone
to owner when inviting.
1 files changed, 2 insertions(+), 0 deletions(-)

M Main.hs
M Main.hs => Main.hs +2 -0
@@ 708,6 708,8 @@ componentStanza _ _ _ _ toComponent _ (ReceivedIQ (IQ { iqType = IQResult, iqFro
			iqPayload = Just $ Element (fromString "{http://jabber.org/protocol/muc#owner}query") [] [
				NodeElement $
				fillFormField (fromString "muc#roomconfig_publicroom") (fromString "0") $
				fillFormField (fromString "muc#roomconfig_persistentroom") (fromString "1") $
				fillFormField (fromString "muc#roomconfig_allowinvites") (fromString "1") $
				fillFormField (fromString "muc#roomconfig_membersonly") (fromString "1")
				form { elementAttributes = [(fromString "{jabber:x:data}type", [ContentText $ fromString "submit"])] }
			]