From: Magnus H. <leg...@us...> - 2008-10-06 11:19:04
|
Update of /cvsroot/emacs-jabber/emacs-jabber In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv16181 Modified Files: jabber-core.el jabber-autoaway.el Log Message: Revision: ma...@fr...--2005/emacs-jabber--cvs-head--0--patch-605 Creator: Magnus Henoch <ma...@fr...> Add jabber-autoaway-start to jabber-post-connect-hooks options; add autoload cookie for jabber-autoaway-start Index: jabber-core.el =================================================================== RCS file: /cvsroot/emacs-jabber/emacs-jabber/jabber-core.el,v retrieving revision 1.97 retrieving revision 1.98 diff -u -d -r1.97 -r1.98 --- jabber-core.el 21 Sep 2008 19:35:55 -0000 1.97 +++ jabber-core.el 6 Oct 2008 11:14:42 -0000 1.98 @@ -77,7 +77,8 @@ jabber-muc-autojoin jabber-whitespace-ping-start jabber-keepalive-start - jabber-vcard-avatars-find-current) + jabber-vcard-avatars-find-current + jabber-autoaway-start) :group 'jabber-core) (defcustom jabber-pre-disconnect-hook nil @@ -219,6 +220,9 @@ (jabber-jid-server jid) (jabber-jid-resource jid) registerp password network-server port connection-type)))) + + (require 'jabber) + (if (member (list username server) (mapcar Index: jabber-autoaway.el =================================================================== RCS file: /cvsroot/emacs-jabber/emacs-jabber/jabber-autoaway.el,v retrieving revision 1.7 retrieving revision 1.8 diff -u -d -r1.7 -r1.8 --- jabber-autoaway.el 30 Mar 2008 18:39:35 -0000 1.7 +++ jabber-autoaway.el 6 Oct 2008 11:14:42 -0000 1.8 @@ -85,6 +85,7 @@ (when jabber-autoaway-verbose (apply #'message args))) +;;;###autoload (defun jabber-autoaway-start (&optional ignored) "Start autoaway timer. The IGNORED argument is there so you can put this function in |