From: ueno <ueno>
Date: Thu, 11 Aug 2005 07:39:20 +0000 (+0000)
Subject: Fixed.
X-Git-Tag: channel-coding-branchpoint~159
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=05948c622bd4bc02528737efd5bd915c914db614;p=elisp%2Friece.git

Fixed.
---

diff --git a/lisp/riece-ruby.el b/lisp/riece-ruby.el
index 2792b22..c7c5d82 100644
--- a/lisp/riece-ruby.el
+++ b/lisp/riece-ruby.el
@@ -327,7 +327,8 @@ Use `riece-ruby-set-property' to set this variable.")
 	 (index 0))
     (while (< index length)
       (if (eq (aref data index) ?\n)
-	  (aset data index " ")))
+	  (aset data index " "))
+      (setq index (1+ index)))
     (riece-send-string
      (format "NOTICE %s :%s\r\n"
 	     (riece-identity-prefix