From: ueno <ueno>
Date: Mon, 23 Jun 2003 04:56:24 +0000 (+0000)
Subject: Fixed.
X-Git-Tag: strict-naming-mergepoint~7
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=e954985215deef7c4ce4c8341029375e72ab8a39;p=elisp%2Friece.git

Fixed.
---

diff --git a/lisp/riece-naming.el b/lisp/riece-naming.el
index 4b4970f..cde0032 100644
--- a/lisp/riece-naming.el
+++ b/lisp/riece-naming.el
@@ -80,7 +80,7 @@
       (if pointer
 	  (setcar pointer new-name))
       (if (and riece-current-channel
-	       (riece-identity-equal (riece-make-identity channel-name
+	       (riece-identity-equal (riece-make-identity (car channels)
 							  riece-server-name)
 				     riece-current-channel))
 	  (with-current-buffer riece-user-list-buffer