From 79b18092c88874f72d3d2f484161d2ffb613bd96 Mon Sep 17 00:00:00 2001
From: ueno <ueno>
Date: Tue, 15 Apr 2008 10:25:41 +0000
Subject: [PATCH] Fixed.

---
 lisp/riece-irc.el |    5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/lisp/riece-irc.el b/lisp/riece-irc.el
index 004f0bc..a2c158e 100644
--- a/lisp/riece-irc.el
+++ b/lisp/riece-irc.el
@@ -86,7 +86,10 @@
 	(unless realname
 	  (setq realname (riece-mcat "No information given")))
 	(if coding
-	    (setq realname (encode-coding-string realname coding)))
+	    (setq realname (encode-coding-string realname
+						 (if (consp coding)
+						     (cdr coding)
+						   coding))))
 	(riece-process-send-string process
 				   (format "USER %s * * :%s\r\n"
 					   (or username
-- 
1.7.10.4