From: Magnus H. <leg...@us...> - 2008-03-05 12:05:59
|
Update of /cvsroot/emacs-jabber/emacs-jabber In directory sc8-pr-cvs17.sourceforge.net:/tmp/cvs-serv20294 Modified Files: jabber-core.el Log Message: Revision: ma...@fr...--2005/emacs-jabber--cvs-head--0--patch-468 Creator: Magnus Henoch <ma...@fr...> Fix :roster-update return value Index: jabber-core.el =================================================================== RCS file: /cvsroot/emacs-jabber/emacs-jabber/jabber-core.el,v retrieving revision 1.85 retrieving revision 1.86 diff -u -d -r1.85 -r1.86 --- jabber-core.el 4 Mar 2008 07:23:27 -0000 1.85 +++ jabber-core.el 5 Mar 2008 12:05:49 -0000 1.86 @@ -696,8 +696,8 @@ (if pending-updates (progn (unless (memq jid-symbol-to-update pending-updates) - (nconc pending-updates (list jid-symbol-to-update)) - (list :session-established state-data :keep))) + (nconc pending-updates (list jid-symbol-to-update))) + (list :session-established state-data :keep)) ;; Otherwise, we need to create the list and start the timer. (setq state-data (plist-put state-data |