* riece-commands.el (riece-command-kick): Fix completing-read
authorkaoru <kaoru>
Tue, 7 Oct 2003 10:09:44 +0000 (10:09 +0000)
committerkaoru <kaoru>
Tue, 7 Oct 2003 10:09:44 +0000 (10:09 +0000)
collection argument.

lisp/ChangeLog
lisp/riece-commands.el

index ef996eb..53dbc71 100644 (file)
@@ -1,3 +1,8 @@
+2003-10-07  TAKAHASHI Kaoru  <kaoru@kaisei.org>
+
+       * riece-commands.el (riece-command-kick): Fix completing-read
+       collection argument.
+
 2003-10-05  Daiki Ueno  <ueno@unixuser.org>
 
        * riece-000.el: Require 'riece-commands.
index 3e3c614..55c0f23 100644 (file)
@@ -189,8 +189,11 @@ the layout to the selected layout-name."
        (error "Not on a channel"))
      (list (completing-read
            "User: "
-           (mapcar #'list (riece-channel-get-users
-                           riece-current-channel)))
+           (mapcar #'list
+                   (riece-with-server-buffer
+                       (riece-identity-server riece-current-channel)
+                     (riece-channel-get-users
+                      (riece-identity-prefix riece-current-channel)))))
           (if current-prefix-arg
               (read-string "Message: ")))))
   (riece-send-string