Update of /cvsroot/emacs-jabber/emacs-jabber
In directory sc8-pr-cvs17.sourceforge.net:/tmp/cvs-serv30288
Modified Files:
jabber-core.el
Log Message:
Revision: ma...@fr...--2005/emacs-jabber--cvs-head--0--patch-549
Creator: Magnus Henoch <ma...@fr...>
If the user gives no input for network server, don't try to connect to the empty string
Index: jabber-core.el
===================================================================
RCS file: /cvsroot/emacs-jabber/emacs-jabber/jabber-core.el,v
retrieving revision 1.91
retrieving revision 1.92
diff -u -d -r1.91 -r1.92
--- jabber-core.el 17 Jun 2008 14:47:01 -0000 1.91
+++ jabber-core.el 16 Aug 2008 21:57:56 -0000 1.92
@@ -186,6 +186,8 @@
(setq network-server
(read-string (format "Network server: (default `%s') " network-server)
nil nil network-server))
+ (when (zerop (length network-server))
+ (setq network-server nil))
(setq port
(car
(read-from-string
|
