r10791 - trunk/libraries/xmpp-bot

Author: hannes
Date: Thu Jun  8 12:24:44 2006
New Revision: 10791

Modified:
   trunk/libraries/xmpp-bot/xmpp-bot.dylan
Log:
Job: minor
*send a get on roster to finish initialization with xmpp-server


Modified: trunk/libraries/xmpp-bot/xmpp-bot.dylan
==============================================================================
--- trunk/libraries/xmpp-bot/xmpp-bot.dylan     (original)
+++ trunk/libraries/xmpp-bot/xmpp-bot.dylan     Thu Jun  8 12:24:44 2006
@@ -37,6 +37,7 @@
   end if;
   authenticate(xmpp-bot.client, xmpp-bot.password, #f);
   send(xmpp-bot.client, make(<presence>, priority: 23));
+  send(xmpp-bot.client, make(<iq>, type: #"get", query: with-xml() query(xmlns 
=> "jabber:iq:roster") end, id: "roster"));
 end;
 
 define method auto-subscriber (xmpp-bot, client, presence)
-- 
Gd-chatter mailing list
Gd-chatter@xxxxxxxxxxxxxxxx
https://www.gwydiondylan.org/mailman/listinfo/gd-chatter