From c0f78670f7cd8067603a6961f21a88d2d9b0cdab Mon Sep 17 00:00:00 2001
From: "psyc://psyced.org/~lynX" <@>
Date: Sat, 20 Nov 2010 16:41:52 +0100
Subject: [PATCH] one runtime error less when doing friendships using xmpp
 clients

---
 world/net/jabber/user.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/world/net/jabber/user.c b/world/net/jabber/user.c
index a3ab42f..594e9da 100644
--- a/world/net/jabber/user.c
+++ b/world/net/jabber/user.c
@@ -158,7 +158,8 @@ msg(source, mc, data, mapping vars, showingLog) {
 	ret = ::msg(source, mc, data, vars, showingLog);
 	buddy = objectp(source) ? source -> qName() : source;
 	jid = mkjid(source);
-	emit(sprintf("<iq type='set' id='%s'>"
+	if (mappingp(xbuddylist) && xbuddylist[buddy] && jid)
+	    emit(sprintf("<iq type='set' id='%s'>"
 		     "<query xmlns='jabber:iq:roster'>"
 		     "<item jid='%s' subscription='both'>%s"
 		     "</item></query></iq>", tag,