emacs-jabber jabber.texi,1.80,1.81 jabber-core.el,1.76,1.77

[Magnus H. <leg...@us...>]

Update of /cvsroot/emacs-jabber/emacs-jabber
In directory sc8-pr-cvs17.sourceforge.net:/tmp/cvs-serv19336

Modified Files:
	jabber.texi jabber-core.el 
Log Message:
Revision: ma...@fr...--2005/emacs-jabber--cvs-head--0--patch-445
Creator:  Magnus Henoch <ma...@fr...>

Keybinding for jabber-connect

Patch by Evgenii Terechkov


Index: jabber-core.el
===================================================================
RCS file: /cvsroot/emacs-jabber/emacs-jabber/jabber-core.el,v
retrieving revision 1.76
retrieving revision 1.77
diff -u -d -r1.76 -r1.77
--- jabber-core.el	2 Feb 2008 16:20:50 -0000	1.76
+++ jabber-core.el	11 Feb 2008 09:47:22 -0000	1.77
@@ -124,16 +124,16 @@
   "Return non-nil if SASL functions are available."
   (featurep 'sasl))
 
-(defun jabber-connect-all ()
+(defun jabber-connect-all (&optional arg)
   "Connect to all configured Jabber accounts.
 See `jabber-account-list'.
 If no accounts are configured, call `jabber-connect' interactively."
-  (interactive)
+  (interactive "P")
   (let ((accounts
 	 (remove-if (lambda (account)
 		      (cdr (assq :disabled (cdr account))))
 		    jabber-account-list)))
-    (if (null accounts)
+    (if (or (null accounts) arg)
 	(call-interactively 'jabber-connect)
       ;; Only connect those accounts that are not yet connected.
       (let ((already-connected (mapcar #'jabber-connection-bare-jid jabber-connections))

Index: jabber.texi
===================================================================
RCS file: /cvsroot/emacs-jabber/emacs-jabber/jabber.texi,v
retrieving revision 1.80
retrieving revision 1.81
diff -u -d -r1.80 -r1.81
--- jabber.texi	17 Nov 2007 11:29:00 -0000	1.80
+++ jabber.texi	11 Feb 2008 09:47:21 -0000	1.81
@@ -12,7 +12,7 @@
 @copying
 This manual is for jabber.el, version 0.8.
 
-Copyright @copyright{} 2004, 2005, 2006, 2007 Magnus Henoch, Tom Berger.
+Copyright @copyright{} 2004, 2005, 2006, 2007, 2008 Magnus Henoch, Tom Berger.
 
 @quotation
 Permission is granted to make and distribute verbatim copies or
@@ -137,7 +137,7 @@
 @code{jabber-account-list}. It sets accounts, that jabber.el knows about. See
 comments for this variable to learn how to set it up. Save your
 changes, and type @kbd{M-x jabber-connect-all} or @kbd{C-x C-j C-c} to
-connect. Use @kbd{M-x jabber-connect} to connect just one account.
+connect. Use @kbd{M-x jabber-connect} to connect just one account (or just type @kbd{C-u C-x C-j C-c}).
 
 If you do not yet have a Jabber account, you can register one.  Enter
 your desired username and the server you wish