[scpubgit/Clifton.git] / notes / jsetup

use App::Clifton::Tower::Jabber
my $hearts = $_SERVER->current_config->bridges->get({ name => 'hearts' });
my $j = $_SERVER->_new_child('App::Clifton::Tower::Jabber', { server => $_SERVER, bridge_name => 'hearts', jabber_config => $hearts->jabber, irc_config => $hearts->irc });
$j->userconfig_set->add($_SERVER->current_config->users->get({ name => 'mst@corvina.org' });
my $xmpp = $j->xmpp_client;
$xmpp->compose(to => 'mst@corvina.org', body => 'hi')->send
$xmpp->configure(on_message => $j->_replace_weakself('handle_message'));
Commit	Line	Data
06185cf5	1	use App::Clifton::Tower::Jabber
327a4b1a	2	my $hearts = $_SERVER->current_config->bridges->get({ name => 'hearts' });
	3	my $j = $_SERVER->_new_child('App::Clifton::Tower::Jabber', { server => $_SERVER, bridge_name => 'hearts', jabber_config => $hearts->jabber, irc_config => $hearts->irc });
	4	$j->userconfig_set->add($_SERVER->current_config->users->get({ name => 'mst@corvina.org' });
06185cf5	5	my $xmpp = $j->xmpp_client;
	6	$xmpp->compose(to => 'mst@corvina.org', body => 'hi')->send
	7	$xmpp->configure(on_message => $j->_replace_weakself('handle_message'));