* riece-commands.el (riece-command-names): Use identity prefix

instead of formatted identity.
(riece-command-who): Ditto.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 41325fb..b47ac68 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -3,6 +3,9 @@
        * riece-commands.el (riece-command-toggle-away): Check user away
        status in the server buffer.
        [cf. <Liece:00119>]
        * riece-commands.el (riece-command-toggle-away): Check user away
        status in the server buffer.
        [cf. <Liece:00119>]

+       (riece-command-names): Use identity prefix
+       instead of formatted identity.
+       (riece-command-who): Ditto.

 
 2003-10-14  TAKAHASHI Kaoru  <kaoru@kaisei.org>
 
 
 2003-10-14  TAKAHASHI Kaoru  <kaoru@kaisei.org>
 

diff --git a/lisp/riece-commands.el b/lisp/riece-commands.el
index 1b05486..fe04361 100644 (file)
--- a/lisp/riece-commands.el
+++ b/lisp/riece-commands.el
@@ -213,7 +213,7 @@ the layout to the selected layout-name."
            (if (and riece-current-channel
                     (riece-channel-p (riece-identity-prefix
                                       riece-current-channel)))
            (if (and riece-current-channel
                     (riece-channel-p (riece-identity-prefix
                                       riece-current-channel)))

-               (cons (riece-format-identity riece-current-channel t)
+               (cons (riece-identity-prefix riece-current-channel)

                      0))))))
   (if (or (not (equal pattern ""))
          (yes-or-no-p "Really want to query NAMES without argument? "))
                      0))))))
   (if (or (not (equal pattern ""))
          (yes-or-no-p "Really want to query NAMES without argument? "))


@@ -227,7 +227,7 @@ the layout to the selected layout-name."
            (if (and riece-current-channel
                     (riece-channel-p (riece-identity-prefix
                                       riece-current-channel)))
            (if (and riece-current-channel
                     (riece-channel-p (riece-identity-prefix
                                       riece-current-channel)))

-               (cons (riece-format-identity riece-current-channel t)
+               (cons (riece-identity-prefix riece-current-channel)

                      0))))))
   (if (or (not (equal pattern ""))
          (yes-or-no-p "Really want to query WHO without argument? "))
                      0))))))
   (if (or (not (equal pattern ""))
          (yes-or-no-p "Really want to query WHO without argument? "))