X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Friece-naming.el;h=cde0032c831e0e38a24cb02cd32ec21554ee1dd9;hb=e954985215deef7c4ce4c8341029375e72ab8a39;hp=4b4970f0ce1feed1185ceb7166074a649dccca0f;hpb=03f7203a4ac7c63a15038bc9cba050396afb25fa;p=elisp%2Friece.git

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