From: Magnus H. <leg...@us...> - 2007-08-07 16:56:52
|
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. |