Update of /cvsroot/emacs-jabber/emacs-jabber
In directory sc8-pr-cvs17:/tmp/cvs-serv29433
Modified Files:
jabber-chat.el
Log Message:
Revision: ma...@fr...--2005/emacs-jabber--cvs-head--0--patch-374
Creator: Magnus Henoch <ma...@fr...>
Fix jabber-chat-get-buffer when jabber-chat-buffer-format contains "%r"
Index: jabber-chat.el
===================================================================
RCS file: /cvsroot/emacs-jabber/emacs-jabber/jabber-chat.el,v
retrieving revision 1.78
retrieving revision 1.79
diff -u -d -r1.78 -r1.79
--- jabber-chat.el 7 May 2007 01:40:12 -0000 1.78
+++ jabber-chat.el 7 Aug 2007 16:56:48 -0000 1.79
@@ -207,7 +207,7 @@
(list
(cons ?n (jabber-jid-displayname chat-with))
(cons ?j (jabber-jid-user chat-with))
- (cons ?r (jabber-jid-resource chat-with)))))
+ (cons ?r (or (jabber-jid-resource chat-with) "")))))
(defun jabber-chat-create-buffer (jc chat-with)
"Prepare a buffer for chatting with CHAT-WITH.
|
