From: Daiki Ueno <ueno@unixuser.org>
Date: Tue, 14 Oct 2003 23:10:46 +0000 (+0000)
Subject: * riece-commands.el (riece-command-names): Use identity prefix
X-Git-Url: http://cgit.sxemacs.org/?p=riece;a=commitdiff_plain;h=a872e7b2f534acf53b2f4e3149e3862448235351;hp=4e9dfb1cadde1025b97c51b66d855f4687888a92;ds=sidebyside

* 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? "))