basically operating chain code

[scpubgit/Clifton.git] / notes / jsetup

diff --git a/notes/jsetup b/notes/jsetup
index cc524a3..347099d 100644 (file)
--- a/notes/jsetup
+++ b/notes/jsetup
@@ -1,5 +1,7 @@
 use App::Clifton::Tower::Jabber
-my $j = $_SERVER->_new_child('App::Clifton::Tower::Jabber', { server => $_SERVER, bridge_name => 'hearts', jabber_config => $_SERVER->current_config->bridges->get({ name => 'hearts' })->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'));