Update of /cvsroot/emacs-jabber/emacs-jabber
In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv18965
Modified Files:
jabber-roster.el
Log Message:
Revision: ma...@fr...--2005/emacs-jabber--cvs-head--0--patch-361
Creator: Magnus Henoch <ma...@fr...>
Add jabber-account property to resources in roster
Index: jabber-roster.el
===================================================================
RCS file: /cvsroot/emacs-jabber/emacs-jabber/jabber-roster.el,v
retrieving revision 1.46
retrieving revision 1.47
diff -u -d -r1.46 -r1.47
--- jabber-roster.el 7 May 2007 02:04:43 -0000 1.46
+++ jabber-roster.el 8 May 2007 15:57:48 -0000 1.47
@@ -445,7 +445,9 @@
(or (cdr (assoc (plist-get (cdr resource) 'show) jabber-presence-faces))
'jabber-roster-user-online)
'jabber-jid
- (format "%s/%s" (symbol-name buddy) (car resource)))
+ (format "%s/%s" (symbol-name buddy) (car resource))
+ 'jabber-account
+ jc)
resource-str)
(insert "\n" resource-str)))))))
|