diff -urN tiarra-20040509/ChangeLog tiarra-20040526/ChangeLog
--- tiarra-20040509/ChangeLog	2004-05-09 13:09:49.000000000 +0900
+++ tiarra-20040526/ChangeLog	2004-05-26 16:04:50.000000000 +0900
@@ -1,3 +1,13 @@
+2004-05-26  phonohawk  <phonohawk@ps.sakura.ne.jp>
+
+	* main/Unicode/Japanese.pm:
+	Unicode::Japanese 0.21に更新。
+
+2004-05-09  phonohawk  <phonohawk@ps.sakura.ne.jp>
+
+	* main/IrcIO.pm (receive):
+	サーバーやクライアントから空行を送られた場合に、エラーが出る問題を修正。
+
 2004-05-09  Topia  <topia@clovery.jp>
 
 	* main/Multicast.pm:
@@ -1639,7 +1649,7 @@
 
 	* これ以前のログは書いていません。
 
-#       Id: $Id: ChangeLog,v 1.148 2004/05/09 04:08:00 topia Exp $
-#   Author: $Author: topia $
-#     Date: $Date: 2004/05/09 04:08:00 $
-# Revision: $Revision: 1.148 $
+#       Id: $Id: ChangeLog,v 1.150 2004/05/26 07:02:37 admin Exp $
+#   Author: $Author: admin $
+#     Date: $Date: 2004/05/26 07:02:37 $
+# Revision: $Revision: 1.150 $
diff -urN tiarra-20040509/main/IrcIO.pm tiarra-20040526/main/IrcIO.pm
--- tiarra-20040509/main/IrcIO.pm	2004-05-09 13:09:49.000000000 +0900
+++ tiarra-20040526/main/IrcIO.pm	2004-05-26 16:04:50.000000000 +0900
@@ -1,5 +1,5 @@
 # -----------------------------------------------------------------------------
-# $Id: IrcIO.pm,v 1.22 2004/03/19 13:21:06 topia Exp $
+# $Id: IrcIO.pm,v 1.23 2004/05/09 12:46:18 admin Exp $
 # -----------------------------------------------------------------------------
 # IrcIOはIRCサーバー又はクライアントと接続し、IRCメッセージをやり取りする抽象クラスです。
 # -----------------------------------------------------------------------------
@@ -164,6 +164,11 @@
 	# CRLFだった場合、末尾にCRが付いているので取る。
 	$current_line =~ s/\x0d$//;
 
+	if (length($current_line) == 0) {
+	    # 空行はスキップ
+	    next;
+	}
+
 	# message_io_hook
 	my $msg = IRCMessage->new(
 	    Line => $current_line, Encoding => $encoding);
ファイルtiarra-20040509/main/Unicode/Japanese.pmとtiarra-20040526/main/Unicode/Japanese.pmは違います