From: ueno <ueno>
Date: Tue, 14 Oct 2003 23:10:46 +0000 (+0000)
Subject: * riece-commands.el (riece-command-names): Use identity prefix
X-Git-Tag: riece-0_1_4~17
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=58039d3df32a6a433f013c8fa26691161af6b31a;p=elisp%2Friece.git

* 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
--- 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-command-names): Use identity prefix
+	instead of formatted identity.
+	(riece-command-who): Ditto.
 
 2003-10-14  TAKAHASHI Kaoru  <kaoru@kaisei.org>
 
diff --git a/lisp/riece-commands.el b/lisp/riece-commands.el
index 1b05486..fe04361 100644
--- 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)))
-		(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? "))
@@ -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)))
-		(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? "))