From: kaoru <kaoru>
Date: Thu, 16 Oct 2003 13:39:39 +0000 (+0000)
Subject: * riece-commands.el (riece-command-universal-server-name-argument):
X-Git-Tag: riece-0_1_4~14
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=884008b8981a82e6d82924c52ccfb0a430d3897d;p=elisp%2Friece.git

* riece-commands.el (riece-command-universal-server-name-argument):
Fix parenthesis.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8014b6d..1d7a383 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2003-10-16  TAKAHASHI Kaoru  <kaoru@kaisei.org>
+
+	* riece-commands.el (riece-command-universal-server-name-argument):
+	Fix parenthesis.
+
 2003-10-16  Daiki Ueno  <ueno@unixuser.org>
 
 	* riece.el (riece-buffer-alist): Rename from
diff --git a/lisp/riece-commands.el b/lisp/riece-commands.el
index 3439412..caaff59 100644
--- a/lisp/riece-commands.el
+++ b/lisp/riece-commands.el
@@ -637,7 +637,7 @@ If prefix argument ARG is non-nil, toggle frozen status."
 (defun riece-command-universal-server-name-argument ()
   (interactive)
   (let* ((riece-overriding-server-name
-	  (completing-read "Server: " riece-server-process-alist)))
+	  (completing-read "Server: " riece-server-process-alist))
 	 (command
 	  (key-binding (read-key-sequence
 			(format "Command to execute on \"%s\":"