xmppout <- botdata.makeXMPPPresence(stanza.GetHeader().From, "subscribe", "", "")
case "unsubscribe", "unsubscribed":
jabber_events <- JabberEvent{stanza.GetHeader().From, false, R3NeverInfo, false}
xmppout <- botdata.makeXMPPPresence(stanza.GetHeader().From, "subscribe", "", "")
case "unsubscribe", "unsubscribed":
jabber_events <- JabberEvent{stanza.GetHeader().From, false, R3NeverInfo, false}